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F.QREWQRD 

This  technical  report  covers  work  performed  under  Air  Force 
Contract  F33600-87-C-04 64 ,  DAPro  Project.  This  contract  is 
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Manufacturing  Technology  Directorate,  through  Mr.  David  L.  Judson, 
Project  Manager.  The  Prime  Contractor  was  Integration  Technology 
Services,  Software  Programs  Division,  of  the  Control  Data 
Corporation,  Dayton,  Ohio,  under  the  direction  of  Mr.  W.  A. 
Osborne.  The  DAPro  Project  Manager  for  Control  Data  Corporation 
was  Mr.  Jimmy  P.  Maxwell. 

The  DAPro  project  was  created  to  continue  the  development,  test, 
and  demonstration  of  the  Integrated  Information  Support  System 
(IISS) .  The  IISS  technology  work  comprises  enhancements  to  IISS 
software  and  the  establishment  and  operation  of  IISS  test  bed 
hardware  and  communications  for  developers  and  users. 
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Arizona  State  University 


Responsible  for  User  Interfaces, 
Virtual  Terminal  Interface , and  Network 
Transaction  Manager  design, 
development,  implementation,  and 
support . 

Responsible  for  test  bed  operations 
and  support . 


Ill 


r 


PS  620344502 
30  September  1990 


TABLE  OF  CONTENTS 

Page 


SECTION  1.0  SCOPE  .  1-1 

1.1  Identification  .  1-1 

1.2  Functional  Summary  .  1-1 

SECTION  2.0  DOCUMENTS  .  2-1 

2.1  Reference  Documents  .  2-1 

2.2  Terms  and  Abbreviations  .  2-1 

SECTION  3.0  REQUIREMENTS  .  3-1 

3.1  Structural  Description  .  3-1 

3.2  Functional  Flow  .  3-1 

3.3  Interfaces  .  3-2 

3.3.1  Forms  Language  Compiler  .  j-2 

3.3.2  CDM  Data  Dictionary  .  3-2 

3.3.3  Generated  Application 

Interfaces  .  3-3 

3.4  Program  Interrupts  .  3-3 

3.5  Timing  and  Sequencing  Description  ..  3-3 

3.6  Special  Control  Features  .  3-3 

3.7  Storage  Allocation  .  3-3 

3.7.1  Data  Base  Definition  .  3-3 

3.7. 1.1  File  Descriptions  .  3-3 

3.7. 1.2  Table  Description  .  3-6 

3.8  Object  Code  Creation  .  3-6 

3.9  Adaptation  Data  .  3-6 

3.10  Detailed  Design  Description  .  3-6 

3.10.1  Main  Program  List  .  3-6 

3.10.2  Module  List  .  3-8 

3.10.3  External  Routines  List  .  3-17 

3.10.4  Include  File  List  .  3-20 

3.10.5  Where  Include  File  Used  List  .  3-22 

3.10.6  Where  External  Routine  Used  List..  3-47 

3.10.7  Main  Program  Parts  List  .  3-61 

3.10.8  Module  Documentation  .  3-68 

3.10.9  Include  File  Description  .  3-303 

3.10.10  Hierarchy  Chart  .  3-317 

3.11  Program  Listings  Comments  .  3-359 

SECTION  4.0  QUALITY  ASSURANCE  PROVISIONS  .  4-1 

4.1  Introduction  and  Definitions  .  4-1 

4.2  Computer  Programming  and  Test 

Evaluation  .  4-1 


IV 


PS  620344502 
30  September  1990 


LIST  OF  ILLUSTRATIONS 


V 


PS  620344502 
30  September  1990 


I  SECTION  1 

SCOPE 


1 . 1  Identification 

This  specification  establishes  the  detailed  design  of  a 
computer  program  identified  as  the  Rapid  Applicaton  Generator 
hereinafter  referred  to  as  RAP.  RAP  is  one  configuration  item 
of  the  Integrated  Information  Support  System  (IISS)  User 
Interface  (UI)  .j 

^  1.2  Functional  Summary 


-  RAP  is  used  to  facilitate  development  of  screen  driven 
interactive  programs  accessing  databases  through  the  Common  Data 
Model  (CDM)_^ 

^  The  major  functions  of  the  Rapid  Application  Generator  are: 


^ —  IJ 

2J 

3') 


4^ 


To  provide  a  screen  driven  interface  to  database 
application  programs^ 

To  provide  a  screen  based  means  of  displaying  the 
contents  of  a  database^ 


To  provide  a  context  within  which  a  single  application 
program  can  switch  between  modes  of  database  access: 
update,  query,  deletion,  and  insert  ionj  A  t'yj> 

To  allow  the  application  developer  to  apply  human 
engineering  to  the  means  by  which  the  user  dialogues 
with  the  database  program. 


< 
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SECTION  2 
DOCUMENTS 


2.1  Reference  Documents 


[1]  Structural  Dynamics  Research  Corporation,  Application 
Interface  Product  Specification,  PS  620144700  ,  1 
November  1985. 

[2]  Structural  Dynamics  Research  Corporation,  Forms 
Driven  Form  Editor  Product  Specification, 

PS  620144402  ,  1  November  1985. 

[3]  Structural  Dynamics  Research  Corporation,  Form 
Processor  Product  Specification,  PS  620144200  , 

1  November  1985. 

[4]  Structural  Dynamics  Research  Corporation,  Forms 
Language  Compiler  Product  Specification, 

PS  620144401  ,  1  November  1985. 

[5]  Structural  Dynamics  Research  Corporation,  Report 
Writer  Product  Specification,  PS  620144501  ,  1 
November  1985. 

[6j  Structural  Dynamics  Research  Corporation,  Text 
Editor  Product  Specification,  PS  620144600  , 

1  November  1985. 

[7]  Structural  Dynamics  Research  Corporation,  User 
Interface  Services  Product  Specification, 

PS  620144100  ,  1  November  1985. 

[8]  Structural  Dynamics  Research  Corporation,  Virtual 
Terminal  Product  Specification ,  PS  620144300, 

1  November  1985. 

[9]  Structural  Dynamics  Research  Corporation,  Rapid 
Appl icat ion  Generator  Development  Specification, 

DS  620144502,  1  November  1985. 

[10]  Structural  Dynamics  Research  Corporation,  Rapid 
Appl ication  Generator  Unit  Test  Plan ,  UTP620144502  , 

1  November  1985. 

[11]  Structural  Dynamics  Research  Corporation,  Rapid 

Appl ication  Generator  User  Manual ,  UM  620144502,  1 

November  1985. 

2.2  Terms  and  Abbreviations 


Appl  ication  Definition  Lanc^uage :  (ADL)  ,  an  extension  ot  the 
Forms  Definition  Language  that  includes  retrieval  of  database 
information  and  conditional  actions.  It  is  used  to  define 
interactive  application  programs. 
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Appl ication  Generator:  (AG),  subset  of  the  IISS  User 
Interface  that  consists  of  software  modules  that  generate  Ilss 
application  code  and  associated  form  definitions  based  on  a 
language  input.  The  part  of  the  AG  that  generates  report 
programs  is  called  the  Report  Writer.  The  part  of  the  AG  that 
generates  interactive  applications  is  called  the  Rapid 
Application  Generator. 

Application  Interface :  (AI),  subset  of  the  IISS  User 

Interface  that  consists  of  the  callable  routines  that  are  linked 
with  applications  that  use  the  Form  Processor  or  Virtual 
Terminal.  The  AI  enables  applications  to  be  hosted  on  computers 
other  that  the  host  of  the  User  Interface. 

Application  Process :  (AP)  ,  a  cohesive  unit  of  softv/are  that 
can  be  initiated  as  a  unit  to  perform  some  function  or 
functions . 

Attribute :  field  characteristic  such  as  blinking, 
highlighted,  black,  etc.  and  various  other  combinations. 
Background  attributes  are  defined  for  forms  or  windows  only. 
Foreground  attributes  are  defined  for  items.  Attributes  may  be 
permanent,  i.e.,  they  remain  the  same  unless  changed  by  the 
application  program,  or  they  may  be  temporary,  i.e.,  they  remain 
in  effect  until  the  v/indow  is  redisplayed. 

Common  Data  Model :  (CDM) ,  IISS  subsystem  that  describes 
common  data  application  process  formats,  form  definitions,  etc. 
of  the  IISS  and  includes  conceptual  schema,  external  schemas, 
internal  schemas,  and  schema  transformation  operators. 

Communication  Services ;  allows  on  host  interprocess 
communication  and  inter-host  communication  be^'ween  the  various 
Test  Bed  subsystems. 

Communication  Subsystem :  (COMM),  IISS  subsystem  that 
provides  communication  services  to  the  Test  Bed  and  subsystems. 

Computer  Program  Configuration  Item:  (CPCI),  an  aggregation 
of  computer  programs  or  any  ot  their  discrete  portions  which 
satisfies  an  end-use  function. 

Conceptual  Schema :  (CS),  the  standard  definition  used  for 

all  data  in  the  CDM.  It  is  based  on  IDEFl  information 
model  ling. 

Cursor  Posit  i  cm :  the  position  of  the  cursor  after  ar.y 
command  is  issued. 

Device  Drivers :  (DD),  soltware  modules  written  to  handle 

I/O  for  a  specitic  kind  of  terminal.  It.e  modules  map  terminal 
specific  commands  and  data  to  a  neutral  format.  Device  Drivers 
are  part  of  the  UI  Virtual  Tcrmiinal. 
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Display  List ;  is  similar  to  the  open  list,  except  that  it 
contains  only  those  forms  that  have  been  added  to  the  screen  and 
are  currently  displayed  on  the  screen. 

External  Schema ;  (ES) ,  an  application's  view  of  the  CDM ' s 
conceptual  schema. 

Field ;  two  dimensional  space  on  a  terminal  screen. 

Field  Pointer:  indicates  the  ITEM  which  contains  the 
current  cursor  position. 

Form:  structured  view  which  may  be  imposed  on  windows  or 
other  forms.  A  form  is  composed  of  fields.  These  fields  may  be 
defined  as  forms,  items,  and  windows. 

Form  Definition:  (FD) ,  forms  definition  language  after 
compilation.  It  is  read  at  runtime  by  the  Form  Processor. 

Forms  Definition  Language :  (FDL) ,  the  language  in  which 
electronic  forms  are  defined. 

Forms  Driver  Form  Editor:  (FDFE) ,  subset  of  the  FE  which 
consists  of  a  forms  driven  application  used  to  create  Form 
Definition  files  interactively. 

Form  Editor:  (FE) ,  subset  of  the  IISS  User  Interface  that 
is  used  to  create  definitions  of  forms.  The  FE  consists  of  the 
Forms  Driven  Form  Editor  and  the  Forms  Language  Compiler. 

Form  Hierarchy :  a  graphic  representation  of  the  way  in 
which  forms,  items  and  windows  are  related  to  their  parent  form. 

Forms  Language  Compiler:  (FLAN) ,  subset  of  the  FE  that 
consists  of  a  batch  process  that  accepts  a  series  of  forms 
definition  language  statements  and  produces  form  definition 
files  as  output. 

Form  Processor:  (FP),  subset  of  the  IISS  User  Interface 
that  consists  of  a  set  of  callable  execution  time  routines 
available  to  an  application  program  for  form  processing. 

Form  Processor  Text  Editor:  (FPTE) ,  subset  of  the  Form 
Processor  that  consists  of  software  modules  that  provide  text 
editing  capabilities  to  all  users  of  applications  that  use  the 
Form  Processor. 

IISS  Function  Screen :  the  first  screen  that  is  displayed 
after  logon.  It  allows  the  user  to  specifiy  the  function  he 
v;ants  to  access  and  the  device  type  and  device  name  on  which  he 
is  working. 

Integrated  Information  Support  System :  (IISS) ,  a  test 
computing  environment  used  to  investigate,  demonstrate  and  test 
the  concepts  of  information  management  and  information 
integration  in  the  context  of  Aerospace  Manufacturing.  The  IISS 
addresses  the  problems  of  integration  of  data  resident  on 
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heterogeneous  data  bases  supported  by  heterogeneous  computers 
interconnected  via  a  Local  Area  Network. 

Item;  non-decomposable  area  of  a  form  in  which  hard-coded 
descriptive  text  may  be  placed  and  the  only  defined  areas  where 
user  data  may  be  input/output. 

Logical  Device :  a  conceptual  device  which  is 
indistinguishable  from  a  physical  device  to  an  application  and 
is  then  mapped  to  part  or  all  of  a  physical  device. 

Message :  descriptive  text  which  may  be  returned  in  the 
standard  message  line  on  the  terminal  screen.  They  are  used  to 
warn  of  errors  or  provide  other  user  information. 

Message  Line:  a  line  on  the  terminal  screen  that  is  used  to 
display  messages. 

Network  Transaction  Manager;  (NTM) ,  IISS  subsystem  that 
performs  the  coordination,  communication  and  housekeeping 
functions  required  to  integrate  the  Application  Processes  and 
System  Services  resident  on  the  various  hosts  into  a  cohesive 
system . 

Neutral  Data  Manipulation  Language ;  (NDML) ,  the  command 
language  by  which  the  CDM  is  accessed  for  the  purpose  of 
extracting,  deleting,  adding,  or  modifying  data. 

Open  List:  a  list  of  all  the  forms  that  have  been  and  are 
currently  open  for  an  application  process. 

Operating  System;  (OS) ,  software  supplied  with  a  computer 
which  allows  it  to  supervise  its  own  operations  and  manage 
access  to  hardware  facilities  such  as  memory  and  peripherals. 

Page:  instance  of  forms  in  windows  that  are  created 
whenever  a  form  is  added  to  a  window. 

Paging  and  Scrolling ;  a  method  which  allows  a  form  to 
contain  more  data  than  can  be  displayed  with  provisions  for 
viewing  any  portion  of  the  data  buffer. 

Physical  Device ;  a  hardware  terminal. 

Presentation  Schema :  (PS),  may  be  equivalent  to  a  form.  It 

is  the  view  presented  to  the  user  of  the  applicator. 

Qual i f ied  Nam.e :  the  name  of  a  form,  item  or  v/indow  preceded 
by  the  hierarchy  path  so  that  it  is  uniquely  identified. 

Rapid  Application  Gp-nerator :  (RAP),  part  of  the  Applicator 
Generator  that  generates  source  code  for  interactive  programs 
based  on  a  language  input. 
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Subform;  a  form  that  is  used  within  another  form. 

Text  Editor:  (TE) ,  subset  of  the  IISS  User  Interface  that 
consists  of  a  file  editor  that  is  based  on  the  text  editing 
functions  built  into  the  Form  Processor. 

User  Data ;  data  which  is  either  input  by  the  user  or  output 
by  the  application  programs  to  items. 

User  Interface ;  (UI),  IISS  subsystem  that  controls  the 

user's  terminal  and  interfaces  with  the  rest  of  the  system.  The 
UI  consists  of  two  major  subsystems:  the  User  Interface 
Development  System  (UIDS)  and  the  User  Interface  Management 
System  (UIMS) . 

User  Interface  Development  System:  (UIDS) ,  collection  of 
IISS  User  Interface  subsystems  that  are  used  by  applications 
programmers  as  they  develop  IISS  applications.  The  UIDS 
includes  the  Form  Editor  and  the  Application  Generator. 

User  Interface  Management  System:  (UIMS),  the  runtime  UI. 

It  consists  of  the  Form  Processor,  Virtual  Terminal,  Application 
Interface,  the  User  Interface  Services,  and  the  Text  Editor. 

User  Interface  Monitor:  (UIM) ,  part  of  the  Form  Processor 
that  handles  messaging  between  the  NTM  and  the  UI.  It  also 
provides  authorization  checks  and  initiates  applications. 

User  Interface  Services:  (UIS) ,  subset  of  the  IISS  User 
Interface  that  consists  of  a  package  of  routines  that  aid  users 
in  controlling  their  environment.  It  includes  message 
management,  change  password,  and  application  definition 
services . 

User  Inter face/ Virtual  Terminal  Interface :  (UI/VTI) , 
another  name  for  the  User  Interface. 

Virtual  Terminal ;  (VT) ,  subset  of  the  IISS  User  Interface 
that  performs  the  interfacing  between  different  terminals  and 
the  UI.  This  is  done  by  defining  a  specific  set  of  terminal 
features  and  protocols  which  must  be  supported  by  the  UI 
software  which  constitutes  the  virtual  terminal  definition. 
Specific  terminals  are  then  mapped  against  the  virtual  terminal 
software  by  specific  software  modules  written  for  each  type  of 
real  terminal  supported. 

Virtual  Terminal  Interface:  (VTI),  the  calJable  interface 
to  the  VT. 

Window:  dynamic  area  of  a  terminal  screen  on  which 
predefined  forms  may  be  placed  at  run  time. 

Window  Manager:  a  facility  which  allows  the  follov;ing  to  be 
manipulated:  size  and  location  of  windows,  the  device  on  which 
an  application  is  running,  the  position  of  a  form  within  a 
window.  It  is  part  of  the  Form  Processor. 
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REQUIREMENTS 


3  .  1  Structural  Description 

The  RAP  is  used  to  translate  interactive  database 
applications  defined  using  the  Application  Definition  Language 
(ADL)  into  programs  that  access  databases  via  the  CDM. 
Conceptually,  the  RAP  is  a  compiler  that  takes  ADL  as  input  and 
generates : 

o  Binary  form  definition  files  that  determine  the  layout  of  the 
interactive  screens. 

o  A  database  operation  program  for  each  type  of  NDML  statement 
that  maps  the  CDM  External  Schema  to  the  Presentation  Schema 
(forms  defined  by  the  FD  files)  for  the  NDML  operations.  The 
module  NDMLGEN.C  calls  the  COBOL  module  CDMESQY.PRC  to  get 
meta  daca  about  the  NDML  operations  from  the  CDM  data 
dictionary  to  check  for  legal  schema  mappings.  Illegal 
mappings  are  recorded  in  a  warning  file.  This  program  also 
generates  the  appropriate  NDML  to  do  the  operations  and  must 
be  precompiled  using  the  NDML  precoompiler . 

o  A  control  flow  program  based  on  the  specified  conditions. 

This  is  the  main  module  of  the  generated  application  that 
uses  the  Application  Interface  to  display  the  interactive 
screens  and  process  the  information  entered  by  the  user. 

3 . 2  Functional  Flow 

Figure  3-1  is  a  data  flow  diagram  of  the  Rapid  Application 
Generator  environment. 
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Figure  3-1  Rapid  Application  Generator  Data  Flow 
3 . 3  Interfaces 

3.3.1  Forms  Language  Compiler 

The  RAP  uses  the  modules  YTAB.C,  FLANSP.C,  and  WRTFRM.C  of 
the  Forms  Language  Compiler  (FLAN)  to  generate  binary  form 
definition  files  from  its  ADL  input  file.  FLAN  also  produces 
the  internal  data  structures  used  to  generate  the  control  flow 
program. 

3.3.2  CDM  Data  Dictionary 

The  data  base  operation  programs  extract  meta  data  about 
the  NDML  operations  from  the  CDM  Data  Dictionary  to  check  for 
legal  External  Schema  to  Presentation  Schema  mappings. 
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3.3.3  Generated  Application  Interfaces 

The  generated  application  is  like  any  other  IISS 
application.  It  interfaces  with  the  User  Interface  via  the 
Application  Interface  and  the  COM  via  the  CDMP  calls  generated 
by  the  NDML  precompiler.  All  applications  that  use  the  CDMP  or 
the  Application  Interface  of  the  UI  also  interface  with  the  NTM. 

3 . 4  Program  Interrupts 

This  section  does  not  apply  to  the  detailed  design  of  the 
Rapid  Application  Generator. 

3 . 5  Timing  and  Sequencing  Description 

This  section  does  not  apply  to  the  detailed  design  of  the 
Rapid  Application  Generator. 

3 . 6  Special  Control  Features 

This  section  does  not  apply  to  the  detailed  design  of  the 
Rapid  Application  Generator. 

3 . 7  Storage  Allocation 

The  Application  Generator  executable  size  is  422  blocks. 
3.7.1  Data  Base  Definition 


3.7. 1.1  File  Descriptions 

1.  FILE  NAME:  formname.FD  -  Form  Definition  file.  The  name  of 
this  file  is  dependent  upon  the  form  it  describes. 

PURPOSE:  This  file  contains  information  about  the  structure 

and  attributes  of  a  form  that  is  used  at  run  time  by  the  Form 
Processor . 

DECLARATION: 

typedef  struct  /*  version  number  record  */ 

I 

char  rectyp;  /*  */ 

int  vernum;  /*  current  version  number  (2)  */ 

char  linefeed; 
f  VERREC; 
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typedef  struct  /*  form  record  */ 

{ 

char  form._name [  10 ]  ;  /*  form  name  */ 

char  background [ 10 ] ;  /*  background  name  */ 

short  row;  /*  starting  row  */ 

short  col;  /*  starting  col  */ 

short  width;  /*  width  */ 

short  depth;  /*  depth  */ 

short  n_txtflds;  /*  number  of  text  fields  */ 

short  n_datflds;  /*  number  of  data  fields  */ 

short  s_txtbuf;  /*  size  of  the  text  buffer  */ 

short  s  defbuf;  /*  size  of  the  default  buffer  */ 

char  linefeed; 

)  FRMREC ; 

typedef  struct 

{ 

short  row; 
short  col ; 
short  len; 
char  linefeed; 

}  TXTREC ; 

typedef  struct  /*  field  record  */ 

{ 

char  f ld_name [ 10 ] ;  /*  field  name  */ 

char  fld_type;  /*  field  type  (F,  I,  W,  A)  */ 

short  row;  /*  starting  row  */ 

short  col;  /*  starting  col  */ 

short  width;  /*  field  width  */ 

short  depth;  /*  field  depth  */ 

int  min_value;  /*  minimum  value  (if  any)  */ 

int  max_value;  /*  maximum  value  (if  any)  */ 

char  helpl ine [ 80 ] ;  /*  help  text  */ 

char  disp_att [ 10] ;  /*  display  attribute  */ 

short  n_formats;  /*  number  of  formats  */ 

char  format [ 12 ] [ 2 ] ;  /*  format  strings  */ 

short  n_arydefs;  /*  number  of  dimensions  */ 

struct  /*  dimension  specification  */ 

{ 

char  dir;  /*  repeat  direction  (H,  V)  */ 

short  cnt ;  /*  actual  repeat  count  */ 

short  sp;  /*  number  of  spaces  between 

repetitions  */ 

short  dsp_size;  /*  display  repeat  count  */ 

)  array_def [ 3 ] ; 
char  linefeed; 

)  FLDREC; 


2.  FILE  NAME:  generated  using  the  COM  file  namer  program  with  a 
TMP  extention  -  the  generated  COBOL  program  processes  the 
results  of  the  NDML  select  and  creates  this  Presentation 
Schema  format  file  of  the  selected  data. 


/*  text  record  */ 

/*  starting  row  */ 
/*  starting  col  */ 
/*  total  length  */ 
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PURPOSE:  This  file  is  a  temporary  file  that  pertains  to  the 

current  NDML  SELECT.  It  is  input  to  the  generated  control 
flow  program  and  processed  to  display  the  selected  data  on 
the  user's  terminal  screen.  If  the  interactive  application 
terminates  abnormally,  this  file  may  be  examined  to  help 
determine  the  cause. 

DECLARATION:  The  module  GENDB.C  generates  a  character  type 

declaration  based  on  the  Presentation  Schema  sizes  of  the 
selected  columns. 

3.  FILE  NAME:  *C.C  -  where  *  is  the  application  name  as  given 
on  the  CREATE  APPLICATION  of  the  ADL  file  -  generated  code. 

PURPOSE:  This  is  the  control  flow  program  generated  by  the 

RAP  that  uses  the  Application  Interface  to  display  the 
interactive  screens  and  process  the  information  entered  by 
the  user. 

DECLARATION:  Character  (i.e.,  PIC  X(80).  in  COBOL). 

4.  FILE  NAME:  *z.PRC  where  *  is  the  application  name  as  given 
on  the  CREATE  APPLICATION  statement  of  the  ADL  file  and  'z' 
indicates  the  NDML  operation  to  be  performed.  A  separate 
file  for  each  NDML  operation  is  generated  with  the  following 
values  for  ' z ' : 

X  for  SELECT 
I  for  INSERT 
D  for  DELETE 
M  for  MODIFY 

These  files  are  COBOL  code  that  contain: 

-  External  Schema  COBOL  record  structures 

-  Presentation  Schema  COBOL  record  structures 

-  Machine  Representation  Conversion  code 
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PURPOSE:  This  code  contains  the  COM  operation  procedures  to 

do  the  database  operations  specified  by  the  NDML  operations 
and  map  the  External  Schema  to  the  Presentation  Schema. 

DECLARATION:  Character  (i.e.,  PIC  X(80).  in  COBOL) 

5.  FILE  NAME:  *.WRN  where  *  is  the  application  name  as  given  on 
the  CREATE  APPLICATION  line  of  the  ADL  file  -  generated  error 
file  listing  any  inconsistancies  in  the  External  to 
Presentation  Schema  mapping. 

PURPOSE:  This  file  should  be  examined  by  the  developer  to 

verify  inconsistancies  in  form  item  sizes  and  External  Schema 
data . 

DECLARATION:  Character  (i.e.,  PIC  X(80).  in  COBOL) 

3.7. 1.2  Table  Description 

The  database  tables  accessed  by  the  RAP  are  predefined  and 
under  the  control  of  the  CDM. 

3 . 8  Object  Code  Creation 

The  RAP  routines  were  compiled  using  a  C  compiler  developed 
by  Interactive  Software  under  VAX/VMS.  The  generated  C  programs 
can  be  compiled  using  the  same  compiler.  The  generated  COBOL 
programs  can  be  compiled  using  any  ANSI  COBOL  compiler. 

3 . 9  Adaptation  Data 

The  C  source  modules  for  the  RAP  can  be  compiled  using  any 
UNIX  version  7  compatible  C  compiler.  The  generated  COBOL  code 
must  be  precompiled  using  the  NDML  precompiler  before  being 
compiled  by  the  COBOL  compiler. 

3.10  Detailed  Design  Description 
3.10.1  Main  Program  List 

The  following  is  a  list  of  all  "Main  Programs"  which 
are  modules  that  are  not  called  by  any  other  module  being 
documented  here.  These  modules  are  either  program  entry  points 
or,  if  they  are  hooked  into  another  set  of  programs  via 
subroutine  calls,  they  are  the  points  the  external  programs  can 
call  and  therefore  enter  through.  To  differentiate  between  the 
two  types  of  entry  points,  look  at  the  individual  Module 
Documentation  (section  3.10.8)  and  look  at  Module  Type  for  each 
of  the  Main  Program  modules  listed.  Note  whether  the  routine 
is  a  Program,  Subroutine,  or  Function.  If  it  is  a  Program,  it 
is  truly  a  main  program  entry  point.  If  not,  then  it  is  merely 
called  by  other  programs  not  being  documented  here. 
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APPLICATION  GENERATOR  Main  Program  List 
Module  Name  Purpose 

GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 
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3.10.2  Module  List 

The  following  is  a  list  of  all  the  modules  being 
documented  here  along  with  their  purpose.  Each  module  has  a 
unique  name,  no  matter  what  language  it  was  written  in. 
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Module  Name 

ACTRSV 

ADDCHK 

ASSIGN 

BLDSUB 

BSCODE 

CALCSTAT 

CCONV 

CDMESQY 

CES 

CESPS 

CHKARY 

CHKFLD 

CHKFRM 

CHKGRP 

CHKSIZE 

CLRNDP 

CLSFIL 

COBCONV 

COBES 

COBESPS 

COBPE 
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APPLICATION  GENEFIATOR  Module  List 
Purpose 

ACTION  RESOLVE 
ADD  POSITION  TO  CHECK  LIST 
ASSIGN  FILE  SECTION 
BUILD  SUBROUTINES 
BUILD  SUBROUTINE  CODE 
CALCULATE  STATISTIC 
C  CONVERSIONS 
PROGRAM  NAME  CDMESQY 
C  ES 

C  ES  TO  PS 
CHECK  ARRAY 
CHECK  FIELD 
CHECK  FORM 

CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 

CHECK  SIZE  OF  ITEMS  DOING  CONVERSIONS  ON 

CLEAR  NODUPLICATE  FIELDS 

CLOSE  FILES 

COBOL  CONVERSIONS 

COBOL  ES  RECORD 

COBOL  ES  TO  PS 

COBOL  PE 
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Module  Name 

Purpose 

CPE 

C  PE 

CSTASH 

CHARACTER  STASH 

CTLRSV 

CONTROL  RESOLVE 

DASH 

WRITE  DASH 

DATAGEN 

DATA  DIVISION 

GENERATE 

DBFREAD 

GENERATE  DATA 

BASE  FREAD 

DCLINDX 

DECLARE  INDEX 

VARIABLES 

ENDGEN 

END  GERNERATE 

ERROR 

ISSUE  ERROR  MESSAGE 

ESPSMAP 

THE  EXTERNAL  SCHEMA  AND  PRESENTATION 
SCHEMA  MAPPING 

ESPSMAP/ INDENT 

INDENT 

FATAL 

ISSUE  FATAL  ERROR  MESSAGE 

FD 

FD  SECTION  DECLARATIONS 

FILELNK 

FILE  LINKAGE  SECTION  GENERATE 

FLANCI 

FLAN  CALLABLE  INTERFACE 

FLDRSV 

FIELD  RESOLVE 

FLDTYP 

FIELD  TYPE 

FNDATT 

FIND  ATTRIBUTE 

FNDFRM 

FIND  FORM 

FRMPDAT 

FORM  PDATA 
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Module 

FRNTND 

GEN 

GENAA 

GENAAL 

GENACT 

GENAE 

GENAH 

GENAI 

GENAL 

GENAP 

GENAQ 

GENAR 

GENAS 

GENAT 

GENBEG 

GENCHG 

GENDB 

GENDOA 

GENDS 

GENEP 
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APPLICATION  GENERATOR  Module  List 
Name  Purpose 

FORMS  FRONT  END  TO  APPLICATION  GENERATOR 
GENERATE  A  LINE  OF  CODE 

GENERATE  PROCEDURE  "ADDACT"  ADD  AN  ACTION 

GENERATE  PROCEDURE  "ADDAL"  ADD  ACTION  LIST 

GENERATE  ACTIONS 

GENERATE  ACTION  EXIT 

GENERATE  ACTION  HELP 

GENERATE  ACTION  INSERT 

GENERATE  ACTION  LIST 

GENERATE  ACTION  PAGE 

GENERATE  ACTION  QUERY  (SELECT) 

GENERATE  ACTION  PRESENT 

GENERATE  ACTION  SET 

GENERATE  ACTION  SIGNAL 

GENERATE  BEGINNING  OF  APPLICATION  OR 
REPORT 

GENERATE  CHANGE  DECLARATIONS 

GENERATE  DATA  BASE  RECORDS  AND  FILE 
DECLARATIONS 

GENERATE  PROCEDURE  "DOACT"  DO  ACTION 
GENERATE  DATA  DATA  STRUCTURES 
GENERATE  FORM  PATH 
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APPLICATION  GENERATOR  Module  List 
Module  Name  Purpose 


GENES 

GENFSD 

GENINS 

GENMAIN 

GENNDP 

GENPAG 

GENTAL 

GENTRG 

GETCOL 

GETFILE 

GETPTH 

GETTBL 

GFLDPT 

GRP/MAIN 

HASDATA 

HASITEM 

HASLOWER 

INDENT 


GENERATE  FORM  DATA  STRUCTURES 

GENERATE  FORM  STRUCTURE  DATA 
INITIALIZATION 

GENERATE  INSERT  DECLARATIONS 
GENERATE  MAIN  PROGRAM 
GENERATE  NODUPLICATE  DECLARATIONS 
GENERATE  NEWPAG  PROCEDURE 
GENERATE  TRIGGER  ACTION  LIST 
GENERATE  TRIGGERS 

GET  THE  COLUMN  NAME  OF  A  TABLE. COLUMN  OR 
COLUMN  STRING 

RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM 
THE  USER 

GET  PATH 

GET  A  TABLE  NAME 
GET  FIELD  POINTER 

GENERATE  APPLICATION/REPORT  PROGRAM 

DETERMINE  IF  THERE  ARE  ANY  SELECT 
STATEMENTS 

THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN 
ITEM  WITHIN 

HAS  A  LOWER  FORM  WHICH  READS  THE  SAME  DATA 
RECORD? 

INDENT  A  LINE  OF  GENERATED  CODE 
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Module  Name  Purpose 


INSERT 

INSRSV 

INSWS 

ISOPNE 

MAKACT 

MAKES 

MAKES/CNUMPIC 

MAKES/ INDENT 

MAKES/NUMPIC 

MAKINS 

MAKINT 

MAKPS 

MAKQR 

MAKSTR 

MAKWH 

MAKWHES 

MAKWHES/COBWHES 
MAKWHES/CWHES 
MAKWHES/ NUMPIC 
MAPDB 


INSERT  PROCEDURE 
INSERT  RESOLVE 

INSERT  WORKING  STORAGE  SECTION 
DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 
MAKE  ACTION  LIST  ELEMENT 

MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

C  NUMBERS 

INDENT 

NUMBER  PICTURE  CLAUSE 
MAKE  INSERT 

MAKE  EXPRESSION  INTO  AN  INTEGER 

MAKES  THE  PRESENTATION  SCHEMA  RECORD 
STRUCTURE 

MAKE  QUALIFIED  REFERENCE 
MAKE  EXPRESSION  INTO  A  STRING 
MAKE  WHERE 

MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA 
VARIABLES 

COBOL  WHERE  ES 

C  WHERE  ES 

NUMBER  PICTURE  CLAUSE 
MAP  DATABASE 
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APPLICATION  GENERATOR  Module  List 


Module  Name 

Purpose 

MKINC 

MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 
MAKING) 

MKPOS 

MAKE  POSITION  NODE 

MLPFRM 

MAKE  A  LIST  OF  PRESENTED  FORMS 

MYALLOC 

MY  MALLOC 

NDMLGEN 

NDML  COBOL  APPLICATION  GENERATOR 

NDMLLAB 

GENERATE  LABELS 

NDMLLNK 

LINKAGE  SECTION 

NULBLK 

BLANK  FILL  A  STRING 

OPNFIL 

GENERATE  OPEN  FILE  SECTION 

PEMAP 

THE  PRESENTATION  SCHEMA  AND  THE  EXTERNAL 
SCHEMA  AND  MAPPING 

PROCGEN 

PROCEDURE  DIVISION  GENERATE 

PSSTRC/COBSUB 

COb  L  SUBSTITUTE 

PSSTRC/CSUB 

C  SUBSTITUTE 

PSSTRC/INDENT 

INDENT 

READDB 

READ  DATA  BASE 

RSETNDP 

RESET  NODUPLICATE  FIELDS  TO  VALUE  OF 
NODUPID 

RSETSTAT 

RESET  STATISTIC 

RWEXPD 

REPORT  WRITER  EXPAND  ARRAYS 

RWOPN 

REPORT  WRITER  OPEN  FORMS 
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APPLICATION  GENERATOR  Module  List 
Module  Name  Purpose 


RWSP/FIXFRM 

SAVEES 

SELECT 

SELGEN 

SELLEN 

SELMAP 

SELOPN 

SELRSV 

SELWHR 

SELWS 

SETNDP 

STATRSV 

STDCODE 

TRGRSV 

UQFOR 

nQPTH 

USING 

VISITA 

U'ARNING 

WINRSV 


FIX  UP  A  FORM 
SAVE  ES  INFORMATION 
GENERATE  SELECT  CODE 
SELECT  GENERATE 

COMPUTE  LENGTH  OF  SELECT  PS  RECORD 
MAP  SELECTED  DATA  TO  OUTPUT  RECORD 
SELECT  OPEN 
SELECT  RESOLVE 
SELECT  WHERE 

SELECT  WORKING  STORAGE  SECTION 

SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY 
ARE  DUPLICATED 

STATISTIC  RESOT^''^’ 

STANDARD  COdOL  CODE 

1  RIGGER  RESOLVE 

UNIVERSAL  CjUALIFIER  FOR  LOOP 

UNIVERSAL  QUALIFIER  PATH 

GENERATE  USING  SECTION 

VISIT  ARRAYS  ON  THIS  FORM 

ISSUE  WARNING  MESSAGE 

WINDOW  RESOLVE 
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APPLICATION  GENERATOR  Module  List 


Module  Name 

Purpose 

WRTEXP 

WRITE  EXPRESSION 

WRTFRM 

WRITE  FORM 

WRTFRM/DBFCLOS 

DEFAULT  BUFFER  CLOSE 

WRTFRM/ FORMAT 

INSERT  FORMAT  CODES 

WRTFRM/TBFCLOS 

TEXT  BUFFER  CLOSE 

WRTFRM/WRTDBF 

WRITE  DEFAULT  BUFFER 

WRTFRM/WRTFLD 

WRITE  FIELD 

WRTFRM/WRTTBF 

WRITE  TEXT  BUFFER 

WRTFRM/WRTTXT 

WRITE  TEXT 

YYLEX 

LEXICAL  ANALYZER  FOR  FLAN 

YYPARSE 

FLAN  PARSER 
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3.10.3  External  Routines  List 

The  following  is  a  list  of  all  routines  or  functions  not 
documented  here  that  are  called  by  modules  that  are  documented 
here.  The  first  caller,  in  alphabetical  order,  is  listed  as 
well.  See  section  3.10.6  for  a  list  of  the  modules 
that  call  each  of  these  external  routines. 
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APPLICATION  GENERATOR  External  Routines  List 


Module  Name 

First  User 

ABS 

CHKFRM 

ADDFRM 

FRNTND 

ATOF 

YYLEX 

ATOI 

YYLEX 

BLEN 

CHKFLD 

CALLOC 

GRP/MAIN 

COPFLD 

RWEXPD 

DELFLD 

FLANCI 

ERRPRO 

CDMESQY 

ESCPY 

CCONV 

FCLOSE 

NDMLGEN 

FOPEN 

WRTFRM 

FPRINTF 

INSERT 

FREE 

CHKFLD 

FWRITE 

WRTFRM/WRTDBF 

GDATA 

FRNTND 

GETC 

YYLEX 

INITAL 

FRNTND 

INITFP 

FRNTND 

INSMAP 

PROCGEN 

ISALNUM 

YYLEX 

ISALPHA 

YYLEX 

ISDIGIT 

YYLEX 

JSSPACE 

YYLEX 

MAKFLD 

YY PARSE 

MALLOC 

MLPFRM 

MAP 

PROCGEN 

MAX 

CHKFRM 

MEMCMP 

FRNTND 

MEMCPY 

WRTFRM/ WRTFLD 

MEMSET 

CHKFLD 

OISCR 

FRNTND 

PMSGLC 

FRNTND 

PMSGLS 

FATAL 

PRINTF 

YY PARSE 

PSESMAP 

PROCGEN 

PTHPTR 

GETPTH 

PUTC 

ESPSMAP/INDENT 

SPRINTF 

GENDOA 

STRASN 

WRTFRM 

STRCAT 

DCLINDX 

APPLICATION  GENERATOR  External  Routines  List 
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Module  Name 


First  User 


STRCHR 

GETPTH 

STRCMP 

RWSP/FIXFRM 

STRCPY 

INSWS 

STRLEN 

CSTASH 

STRNCMP 

SAVEES 

STRNCPY 

YYPARSE 

STRSPN 

GENAS 

STRUPC 

GETPTH 

SYSMSG 

CHKFLD 

TERMFP 

GRP/MAIN 

TOUPPER 

YYLEX 

TRMNAT 

FRNTND 

TRMNDML 

GRP/MAIN 

UNGETC 

YYLEX 

YYERROR 

YYPARSE 
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3.10.4  Include  File  List 

The  following  is  a  list  of  all  include  files  called  in 
by  modules  being  documented  here.  Each  include  file  has  a 
unique  name  regardless  of  the  language  being  used.  The  purpose 
of  each  include  file  is  listed  as  well.  A  more  complete 
description  of  each  include  file  is  given  in  section  3.10.9. 

The  purpose  listed  is  the  one  that  is  in  the  source  code  of  the 
include  file. 

A  purpose  of  "****  PURPOSE  NOT  FOUND  BY  STRIPPER  ****" 
indicates  that  a  purpose  statement  was  not  written  into  the 
include  file  itself.  The  most  common  reason  for  this  is  that 
the  include  file  comes  from  system  libraries  that  were  not 
developed  by  the  project,  such  as  'C  libraries  that  are 
provided  with  the  'C  compiler. 

See  section  3.10.6  for  a  set  of  lists  which  show  all 
the  modules  which  call  in  each  of  these  include  files. 
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APPLICATION  GENERATOR  Include  File  List 


File  Name 


Purpose 


CTLCHR 

CTYPE 

ERRPRO 

FFFV2 

FLAN. Y" 

FPCODE 

FPD 

FPDINI 

FPPARM 

MATH 

NTM 

RW 

SRVRET 

STDIO 

STDTYP 


CONTROL  CHARACTERS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

PROCESS  ERROR  INCLUDE  FILE 

FORM  FILE  FORMAT  -  VERSION  2 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  RETURN  CODES 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

NTM  INTERFACE  INCLUDE  FILE 

REPORT  WRITER  DEFINITIONS 

AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

STANDARD  TYPE  DEFINITIONS 
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3.10.5  Where  Include  File  Used  List 

The  following  lists  each  include  file  from  3.10.4  and 
all  the  modules  documented  in  this  specification  which  include 
them.  The  purpose  of  each  module  is  listed  as  well. 
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Include 

Module 

Module 

File 

Name 

Purpose 

CTLCHR 

ASSIGN 

ASSIGN  FILE  SECTION 

CLSFIL 

CLOSE  FILES 

DATAGEN 

DATA  DIVISION  GENERATE 

ENDGEN 

END  GERNERATE 

FD 

FD  SECTION  DECLARATIONS 

FILELNK 

FILE  LINKAGE  SECTION  GENERATE 

INDENT 

INDENT  A  LINE  OF  GENERATED  CODE 

INSERT 

INSERT  PROCEDURE 

INSWS 

INSERT  WORKING  STOFIAGE  SECTION 

NDMLGEN 

NDML  COBOL  APPLICATION  GENERATOR 

NDMLLAB 

GENERATE  LABELS 

NDMLLNK 

LINKAGE  SECTION 

NULBLK 

BLANK  FILL  A  STRING 

OPNFIL 

GENERATE  OPEN  FILE  SECTION 

PROCGEN 

PROCEDURE  DIVISION  GENERATE 

SAVEES 

SAVE  ES  INFORMATION 

SELECT 

GENERATE  SELECT  CODE 

SELGEN 

SELECT  GENERATE 

S ELLEN 

COMPUTE  LENGTH  OF  SELECT  PS  RECORD 

SELMAP 

MAP  SELECTED  DATA  TO  OUTPUT  RECORD 

SELWS 

SELECT  WORKING  STORAGE  SECTION 

3TDCODE 

STANDARD  COBOL  CODE 

USING 

GENERATE  USING  SECTION 

CTVPE 

MAKACT 

MAKE  ACTION  LIST  ELEMENT 

YYLEX 

LEXICAL  ANALYZER  FOR  FLAN 

YY PARSE 

FLAN  PARSER 

ERR PRO 

CDMESQY 

PROGRAM  NAME  CDMESQY 
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File  Name  Purpose 


FFFV2 

WRTFRM  WRITE  FORM 
WRTFRM/DB  DEFAULT  BUFFER  CLOSE 
WRTFRM/FO  INSERT  FORMAT  CODES 
WRTFRM/TB  TFXT  BUFFER  CLOSE 
WRTFRM/WR  WRITE  DEFAULT  BUFFER 
WRTFRM/WR  WRITE  FIELD 
WRTFRM/WR  WRITE  TEXT  BUFFER 
WRTFRM/WR  WRITE  TEXT 


FLAN. Y" 

MAKACT  MAKE  ACTION  LIST  ELEMENT 

YYLEX  LEXICAL  ANALYZER  FOR  FLAN 

YYPARSE  FLAN  PARSER 


FPCODE 


ACTRSV 

ADDCHK 

ASSIGN 

CALCSTAT 

CHKARY 

CHKFLD 

CHKFRM 

CLSFIL 

CSTASH 

CTLRSV 

DATAGEN 

ENDGEN 

FD 

FILELNK 


ACTION  RESOLVE 

ADD  POSITION  TO  CHECK  LIST 

ASSIGN  FILE  SECTION 

CALCULATE  STATISTIC 

CHECK  ARRAY 

CHECK  FIELD 

CHECK  FORM 

CLOSE  FILES 

CHARACTER  STASH 

CONTROL  RESOLVE 

DATA  DIVISION  GENERATE 

END  GERNERATE 

FD  SECTION  DECLARATIONS 

FILE  LINKAGE  SECTION  GENERATE 
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FLANCI  FLAN  CALLABLE  INTERFACE 
FLDRSV  FIELD  RESOLVE 
FLDTYP  FIELD  TYPE 
FNDATT  FIND  ATTRIBUTE 

FNDFRM  FIND  FORM 

GETCOL  GET  THE  COLUMN  NAME  OF  A  TABLE. COLUMN  OR 
COLUMN  STRING 
GETPTH  GET  PATH 

GETTBL  GET  A  TABLE  NAME 

GFLDPT  GET  FIELD  POINTER 

INDENT  INDENT  A  LINE  OF  GENERATED  CODE 

INSERT  INSERT  PROCEDURE 

INSRSV  INSERT  RESOLVE 

INSWS  INSERT  WORKING  STOFLAGE  SECTION 

MAKINS  MAKE  INSERT 

MAKINT  MAKE  EXPRESSION  INTO  AN  INTEGER 
MAKPS  MAKES  THE  PRESENTATION  SCHEMA  RECORD 

STRUCTURE 

MAKSTR  MTKE  EXPRESSION  INTO  A  STRING 
MAKWH  MAKE  WHERE 

MAKWHFiS  MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA 
VARIABLES 

MAr.;hES/C  COBOL  WHERE  ES 

M,.KWHES/C  C  WHERE  ES 

MAKWHES/N  NUMBER  PICTURE  CLAUSE 

MKPOS  MAKE  POSITION  NODE 

MLPFRM  MAKE  A  LIST  OF  PRESENTED  FORMS 

MYALLOC  MY  MALLOC 

NDMLGEN  NDML  COBOL  APPLICATION  GENERATOR 

NDMLLAB  GENERATE  LABELS 

NDMLLNK  LINKAGE  SECTION 

NULBLK  BLANK  FILL  A  STRING 

OPNFIL  GENERATE  OPEN  FILE  SECTION 

PROCGEN  PROCEDURE  DIVISION  GENERATE 

PSSTRC/CO  COBOL  SUBSTITUTE 

PSSTRC/CS  C  SUBSTITUTE 

PSSTRC/IN  INDENT 

RSETSTAT  RESET  STATISTIC 

RWEXPD  REPORT  WRITER  EXPAND  ARRAYS 

RWOPN  REPORT  WRITER  OPEN  FORMS 
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Include  Module  Module 

File  Name  Purpose 


RWSP/FIXF  FIX  UP  A  FORM 

SAVEES  SAVE  ES  INFORMATION 

SELECT  GENERATE  SELECT  CODE 

SELGEN  SELECT  GENERATE 

SELLEN  COMPUTE  LENGTH  OF  SELECT  PS  RECORD 
SELMAP  MAP  SELECTED  DATA  TO  OUTPUT  RECORD 
SELRSV  SELECT  RESOLVE 

SELWS  SELECT  WORKING  STORAGE  SECTION 

STATRSV  STATISTIC  RESOLVE 

STDCODE  STANDARD  COBOL  CODE 

TRGRSV  TRIGGER  RESOLVE 

UQPTH  UNIVERSAL  QUALIFIER  PATH 

USING  GENERATE  USING  SECTION 

WINRSV  WINDOW  RESOLVE 

WRTEXP  WRITE  EXPRESSION 

WRTFRM  WRITE  FORM 

WRTFRM/DB  DEFAULT  BUFFER  CLOSE 

WRTFRM/ FO  INSERT  FORMAT  CODES 

WRTFRM/TB  TEXT  BUFFER  CLOSE 

WRTFRM/WR  WRITE  DEFAULT  BUFFER 

WRTFRM/WR  WRITE  FIELD 

WRTFRM/WR  WRITE  TEXT  BUFFER 

WRTFRM/WR  WRITE  TEXT 


FPD 

ACTRSV 

ADDCHK 

ASSIGN 

BLDSUB 

BSCODE 

CALCSTAT 

CCONV 

CES 

CESPS 

CHKARY 

CHKFLD 

CHKFRM 


ACTION  RESOLVE 
ADD  POSITION  TO  CHECK  LIST 
ASSIGN  FILE  SECTION 
BUILD  SUBROUTINES 
BUILD  SUBROUTINE  CODE 
CALCULATE  STATISTIC 
C  CONVERSIONS 
C  ES 

C  ES  TO  PS 
CHECK  ARRAY 
CHECK  FIELD 
CHECK  FORM 
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CHKGRP  CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 

CHKSIZE  CHECK  SIZE  OF  ITEMS  DOING  CONVERSIONS  ON 

CLRNDP  CLEAR  NODUPLICATE  FIELDS 

CLSFIL  CLOSE  FILES 

COBCONV  COBOL  CONVERSIONS 

COBES  COBOL  ES  RECORD 

COBESPS  COBOL  ES  TO  PS 

COBPE  COBOL  PE 

CPE  C  PE 

CSTASH  CHARACTER  STASH 

CTLRSV  CONTROL  RESOLVE 

DASH  WRITE  DASH 

DATAGEN  DATA  DIVISION  GENERATE 

DBFREAD  GENERATE  DATA  BASE  FREAD 

DCLINDX  DECLARE  INDEX  VARIABLES 

ENDGEN  END  GERNERATE 

ESPSMAP  THE  EXTERNAL  SCHEMA  AND  PRESENTATION 
SCHEMA  MAPPING 
ESPSMAP/I  INDENT 

FD  FD  SECTION  DECLARATIONS 

FILELNK  FILE  LINKAGE  SECTION  GENERATE 

FLANCI  FLAN  CALLABLE  INTERFACE 

FLDRSV  FIELD  RESOLVE 

FLDTYP  FIELD  TYPE 

FNDATT  FIND  ATTRIBUTE 

FNDFRM  FIND  FORM 

FRMPDAT  FORM  PDATA 

GEN  GENERATE  A  LINE  OF  CODE 

GENAA  GENERATE  PROCEDURE  "ADDACT"  ADD  AN  ACTION 

GENAAL  GENERATE  PROCEDURE  "ADDAL"  ADD  ACTION  LIST 

GENACT  GENERATE  ACTIONS 

GENAE  GENERATE  ACTION  EXIT 

GENAH  GENERATE  ACTION  HELP 

GENAI  GENERATE  ACTION  INSERT 

GENAL  GENERATE  ACTION  LIST 

GENAP  GENERATE  ACTION  PAGE 

GENAQ  GENERATE  ACTION  QUERY  (SELECT) 

GENAR  GENERATE  ACTION  PRESENT 

GENAS  GENERATE  ACTION  SET 

GENAT  GENERATE  ACTION  SIGNAL 
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GENBEG  GENERATE  BEGINNING  OF  APPLICATION  OR 

REPORT 

GENCHG  GENERATE  CHANGE  DECLARATIONS 

GENDB  GENERATE  DATA  BASE  RECORDS  AND  FILE 

DECLARATIONS 

GENDOA  GENERATE  PROCEDURE  "DOACT"  DO  ACTION 

GENDS  GENERATE  DATA  DATA  STRUCTURES 

GENFP  GENERATE  FORM  PATH 

GENFS  GENERATE  FORM  DATA  STRUCTURES 

GENFSD  GENERATE  FORM  STRUCTURE  DATA 

INITIALIZATION 

GENINS  GENERATE  INSERT  DECLARATIONS 

GENMAIN  GENERATE  MAIN  PROGRAM 

GENNDP  GENERATE  NODUPLICATE  DECLARATIONS 

GENPAG  GENERATE  NEWPAG  PROCEDURE 

CENTAL  GENERATE  TRIGGER  ACTION  LIST 

GENTRG  GENERATE  TRIGGERS 

GETCOL  GET  THE  COLUMN  NAME  OF  A  TABLE . COLUMN  OR 

COLUMN  STRING 

GETFILE  RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM 
THE  USER 
GETPTH  GET  PATH 

GETTBL  GET  A  TABLE  NAME 

GFLDPT  GET  FIELD  POINTER 

GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 

HASDATA  DETERMINE  IF  THERE  ARE  ANY  SELECT 
STATEMENTS 

HASITEM  THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN 
ITEM  WITHIN 

HASLOWER  HAS  A  LOWER  FORM  WHICH  READS  THE  SAME  DATA 
RECORD? 

INDENT  INDENT  A  LINE  OF  GENERATED  CODE 

INSERT  INSERT  PROCEDURE 

INSRSV  INSERT  RESOLVE 

INSWS  INSERT  WORKING  STORAGE  SECTION 

ISOPNE  DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 

MAKACT  MAKE  ACTION  LIST  ELEMENT 

MAKES  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

MAKES/ CNU  C  NUMBERS 
MAKES/IND  INDENT 
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Include  Module  Module 

File  Name  Purpose 


MAKES/NUM  NUMBER  PICTURE  CLAUSE 

MAKINS  MAKE  INSERT 

MAKINT  MAKE  EXPRESSION  INTO  AN  INTEGER 

MAKPS  MAKES  THE  PRESENTATION  SCHEMA  RECORD 

STRUCTURE 

MAKQR  MAKE  QUALIFIED  REFERENCE 

MAKSTR  MAKE  EXPRESSION  INTO  A  STRING 
MAKWH  MAKE  WHERE 

MAKWHES  MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA 
VARIABLES 

MAKWHES/C  COBOL  WHERE  ES 
MAKWHES/C  C  WHERE  ES 
MAKWHES/N  NUMBER  PICTURE  CLAUSE 
MAPDB  MAP  DATABASE 

MKINC  MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 

MAKING) 

MKPOS  MAKE  POSITION  NODE 

MLPFRM  MAKE  A  LIST  OF  PRESENTED  FORMS 

MYALLOC  MY  MALLOC 

NDMLGEN  NDML  COBOL  APPLICATION  GENERATOR 
NDMLLAB  GENERATE  LABELS 
NDMLLNK  LINKAGE  SECTION 
NULBLK  BLANK  FILL  A  STRING 

OPNFIL  GENERATE  OPEN  FILE  SECTION 

PEMAP  THE  PRESENTATION  SCHEMA  AND  THE  EXTERNAL 

SCHEMA  AND  MAPPING 

PROCGEN  PROCEDURE  DIVISION  GENERATE 

PSSTRC/CO  COBOL  SUBSTITUTE 

PSSTRC/CS  C  SUBSTITUTE 
PSSTRC/IN  INDENT 
READDB  READ  DATA  BASE 

RSETNDP  RESET  NODUPLICATE  FIELDS  TO  VALUE  OF 

NODUP%D 

RSETSTAT  RESET  STATISTIC 
RWEXPD  REPORT  WRITER  EXPAND  ARRAYS 

RWOPN  REPORT  WRITER  OPEN  FORMS 

RWSP/FIXF  FIX  UP  A  FORM 
SAVEES  SAVE  ES  INFORMATION 
SELECT  GENERATE  SELECT  CODE 
SELGEN  SELECT  GENERATE 
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SELLEN  COMPUTE  LENGTH  OF  SELECT  PS  RECORD 

SELMAP  MAP  SELECTED  DATA  TO  OUTPUT  RECORD 

SELOPN  SELECT  OPEN 

SELRSV  SELECT  RESOLVE 

SELWHR  SELECT  WHERE 

SELWS  SELECT  WORKING  STORAGE  SECTION 

SETNDP  SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY 
ARE  DUPLICATED 
STATRSV  STATISTIC  RESOLVE 
STDCODE  STANDARD  COBOL  CODE 
TRGRSV  TRIGGER  RESOLVE 
UQFOR  UNIVERSAL  QUALIFIER  FOR  LOOP 

UQPTH  UNIVERSAL  QUALIFIER  PATH 

USING  GENERATE  USING  SECTION 

VISITA  VISIT  ARRAYS  ON  THIS  FORM 

WINRSV  WINDOW  RESOLVE 

WRTEXP  WRITE  EXPRESSION 
WRTFRM  WRITE  FORM 
WRTFRM/DB  DEFAULT  BUFFER  CLOSE 
WRTFRM/ FO  INSERT  FORMAT  CODES 
WRTFRM/TB  TEXT  BUFFER  CLOSE 
WRTFRM/WR  WRITE  DEFAULT  BUFFER 
WRTFRM/WR  WRITE  FIELD 
WRTFRM/WR  WRITE  TEXT  BUFFER 
WRTFRM/WR  WRITE  TEXT 
YYLEX  LEXICAL  ANALYZER  FOR  FLAN 

YY PARSE  FLAN  PARSER 


FPDINI 

BLDSUB  BUILD  SUBROUTINES 

BSCODE  BUILD  SUBROUTINE  CODE 

CHKGRP  CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 
CLRNDP  CLEAR  NODUPLICATE  FIELDS 

DBFREAD  GENERATE  DATA  BASE  FREAD 

GEN  GENERATE  A  LINE  OF  CODE 

GENPAG  GENERATE  NEWPAG  PROCEDURE 
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Include 

File 


Module 

Name 


Module 

Purpose 


GETFILE 

GRP/MAIN 
HAS DATA 

HAS ITEM 

HAS LOWER 

ISOPNE 

MAKQR 

MAPDB 

READDB 

RSETNDP 

SETNDP 

VISITA 


RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM 
THE  USER 

GENERATE  APPLICATION/REPORT  PROGRAM 
DETERMINE  IF  THERE  ARE  ANY  SELECT 
STATEMENTS 

THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN 
ITEM  WITHIN 

HAS  A  LOWER  FORM  WHICH  READS  THE  SAME  DATA 
RECORD? 

DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 
MAKE  QUALIFIED  REFERENCE 
MAP  DATABASE 
READ  DATA  BASE 

RESET  NODUPLICATE  FIELDS  TO  VALUE  OF 
NODUP%D 

SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY 

ARE  DUPLICATED 

VISIT  ARRAYS  ON  THIS  FORM 


FPPARM 


ASSIGN 

BLDSUB 

BSCODE 

CHKGRP 

CLRNDP 

CLSFIL 

DATAGEN 

DBFREAD 

ENDGEN 

FD 

FILELNK 

FRNTNO 

GEN 

GENMAIN 

GENPAG 

GETFILE 


ASSIGN  FILE  SECTION 
BUILD  SUBROUTINES 
BUILD  SUBROUTINE  CODE 

CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 
CLEAR  NODUPLICATE  FIELDS 
CLOSE  FILES 

DATA  DIVISION  GENERATE 

GENERATE  DATA  BASE  FREAD 

END  GERNERATE 

FD  SECTION  DECLARATIONS 

FILE  LINKAGE  SECTION  GENERATE 

FORMS  FRONT  END  TO  APPLICATION  GENERATOR 

GENERATE  A  LINE  OF  CODE 

GENERATE  MAIN  PROGRAM 

GENERATE  NEWPAG  PROCEDURE 

RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM 
THE  USER 
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GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 
HASDATA  DETERMINE  IF  THERE  ARE  ANY  SELECT 
STATEMENTS 

HASITEM  THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN 
ITEM  WITHIN 

HAS LOWER  HAS  A  LOWER  FORM  WHICH  READS  THE  SAME  DATA 
RECORD? 

INDENT  INDENT  A  LINE  OF  GENERATED  CODE 

INSERT  INSERT  PROCEDURE 

INSWS  INSERT  WORKING  STORAGE  SECTION 

ISOPNE  DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 
MAKACT  MAKE  ACTION  LIST  ELEMENT 

MAKINS  MAKE  INSERT 

MAKPS  MAKES  THE  PRESENTATION  SCHEMA  RECORD 

STRUCTURE 

MAKQR  MAKE  QUALIFIED  REFERENCE 

MAKWH  MAKE  WHERE 

MAKWHES  MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA 
VARIABLES 

MAKWHES/C  COBOL  WHERE  ES 
MAKWHES/C  C  WHERE  ES 
MAKWHES/N  NUMBER  PICTURE  CLAUSE 
MAPDB  MAP  DATABASE 

NDMLGEN  NDML  COBOL  APPLICATION  GENERATOR 

NDMLLAB  GENEPvATE  LABELS 

NDMLLNK  LINKAGE  SECTION 

NULBLK  BLANK  FILL  A  STRING 

OPNFIL  GENERATE  OPEN  FILE  SECTION 

PROCGEN  PROCEDURE  DIVISION  GENERATE 

PSSTRC/CO  COBOL  SUBSTITUTE 

PSSTRC/CS  C  SUBSTITUTE 

PSSTRC/IN  INDENT 

READDB  READ  DATA  BASE 

RSETNDP  RESET  NODUPLICATE  FIELDS  TO  VALUE  OF 

NODUPID 

SAVEES  SAVE  ES  INFORMATION 

SELECT  GENERATE  SELECT  CODE 

SELGEN  SELECT  GENERATE 

SELLEN  COMPUTE  LENGTH  OF  SELECT  PS  RECORD 

SELMAP  MAP  SELECTED  DATA  TO  OUTPUT  RECORD 
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Include 
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Module 

File 

Name 

Purpose 

SELWS 

SELECT  WORKING  STORAGE  SECTION 

SETNDP 

SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY 
ARE  DUPLICATED 

STDCODE 

STANDARD  COBOL  CODE 

USING 

GENERATE  USING  SECTION 

VISITA 

VISIT  ARRAYS  ON  THIS  FORM 

YYLEX 

LEXICAL  ANALYZER  FOR  FLAN 

YYPARSE 

FLAN  PARSER 

MATH 

MAKACT  MAKE  ACTION  LIST  ELEMENT 

YYLEX  LEXICAL  ANALYZER  FOR  FLAN 

YY PARSE  FLAN  PARSER 


NTM 

ASSIGN  ASSIGN  FILE  SECTION 

BLDSUB  BUILD  SUBROUTINES 

BSCODE  BUILD  SUBROUTINE  CODE 

CHKGRP  CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 

CLRNDP  CLEAR  NODUPLICATE  FIELDS 

CLSFIL  CLOSE  FILES 

DATAGEN  DATA  DIVISION  GENERATE 

DBFREAD  GENERATE  DATA  BASE  FREAD 

ENDGEN  END  GERNERATE 

FD  FD  SECTION  DECLARATIONS 

FILELNK  FILE  LINKAGE  SECTION  GENERATE 

FRNTND  FORMS  FRONT  END  TO  APPLICATION  GENERATOR 

GEN  GENERATE  A  LINE  OF  CODE 

GENPAG  GENERATE  NEWPAG  PROCEDURE 

GETFILE  RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM 
THE  USER 

GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 
HASDATA  DETERMINE  IF  THERE  ARE  ANY  SELECT 
STATEMENTS 
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HASITEM  THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN 
ITEM  WITHIN 

HASLOWER  HAS  A  LOWER  FORM  WHICH  READS  THE  SAME  DATA 
RECORD? 

INDENT  INDENT  A  LINE  OF  GENERATED  CODE 
INSERT  INSERT  PROCEDURE 

INSWS  INSERT  WORKING  STORAGE  SECTION 

ISOPNE  DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 
MAKQR  MAKE  QUALIFIED  REFERENCE 

MAPDB  MAP  DATABASE 

NDMLGEN  NDML  COBOL  APPLICATION  GENERATOR 
NDMLLAB  GENERATE  LABELS 

NDMLLNK  LINKAGE  SECTION 

NULBLK  BLANK  FILL  A  STRING 

OPNFIL  GENERATE  OPEN  FILE  SECTION 

PROCGEN  PROCEDURE  DIVISION  GENERATE 

READDB  READ  DATA  BASE 

RSETNDP  RESET  NODUPLICATE  FIELDS  TO  VALUE  OF 
NODUP%D 

SAVEES  SAVE  ES  INFORMATION 

SELECT  GENERATE  SELECT  CODE 

SELGEN  SELECT  GENERATE 

SELLEN  COMPUTE  LENGTH  OF  SELECT  PS  RECORD 

SELMAP  MAP  SELECTED  DATA  TO  OUTPUT  RECORD 

SELWS  SELECT  WORKING  STORAGE  SECTION 

SETNDP  SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY 
ARE  DUPLICATED 

STDCODE  STANDARD  COBOL  CODE 

USING  GENERATE  USING  SECTION 

VISITA  VISIT  ARRAYS  ON  THIS  FORM 


ACTRSV  ACTION  RESOLVE 

ADDCHK  ADD  POSITION  TO  CHECK  LIST 

ASSIGN  ASSIGN  FILE  SECTION 

BLDSUB  BUILD  SUBROUTINES 

BSCODE  BUILD  SUBROUTINE  CODE 
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CALCSTAT 

CCONV 

CES 

CESPS 

CHKARY 

CHKFLD 

CHKFRM 

CHKGRP 

CHKSIZE 

CLRNDP 

CLSFIL 

COBCONV 

COBES 

COBESPS 

COBPE 

CPE 

CSTASH 

CTLRSV 

DASH 

DATAGEN 

DBFREAD 

DCLINDX 

ENDGEN 

ESPSMAP 

ESPSMAP/ 

FD 

FILELNK 

FLANCI 

FLDRSV 

FLDTYP 

FNDATT 

FNDFRM 

FRMPDAT 

GEN 

GENAA 

GENAAL 

GENACT 

GENAE 

GENAH 


CALCULATE  STATISTIC 
C  CONVERSIONS 
C  ES 

C  ES  TO  PS 
CHECK  ARRAY 
CHECK  FIELD 
CHECK  FORM 

CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 

CHECK  SIZE  OF  ITEMS  DOING  CONVERSIONS  ON 

CLEAR  NODUPLICATE  FIELDS 

CLOSE  FILES 

COBOL  CONVERSIONS 

COBOL  ES  RECORD 

COBOL  ES  TO  PS 

COBOL  PE 

C  PE 

CHARACTER  STASH 
CONTROL  RESOLVE 
WRITE  DASH 

DATA  DIVISION  GENERATE 
GENERATE  DATA  BASE  FREAD 
DECLARE  INDEX  VARIABLES 
END  GERNERATE 

THE  EXTERNAL  SCHEMA  AND  PRESENTATION 
SCHEMA  MAPPING 
I  INDENT 

FD  SECTION  DECLARATIONS 

FILE  LINKAGE  SECTION  GENERATE 

FLAN  CALLABLE  INTERFACE 

FIELD  RESOLVE 

FIELD  TYPE 

FIND  ATTRIBUTE 

FIND  FORM 

FORM  PDATA 

GENERATE  A  LINE  OF  CODE 

GENERATE  PROCEDURE  "ADDACT"  ADD  AN  ACTION 
GENERATE  PROCEDURE  "ADDAL"  ADD  ACTION  LIST 
GENERATE  ACTIONS 
GENERATE  ACTION  EXIT 
GENERATE  ACTION  HELP 
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GENAI 

GENAL 

GENAP 

GENAQ 

GENAR 

GENAS 

GENAT 

GENBEG 

GENCHG 

GENDB 

GENDOA 

GENDS 

GENFP 

GENFS 

GENFSD 

GENINS 

GENMAIN 

GENNDP 

GEN PAG 

GENTAL 

GENTRG 

GETCOL 

GETFILE 

GETPTH 
GETTBL 
GFLDPT 
GRP/MAIN 
HAS DATA 

HASITEM 

HAS LOWER 

INDENT 

INSERT 


GENERATE  ACTION  INSERT 
GENERATE  ACTION  LIST 
GENERATE  ACTION  PAGE 
GENERATE  ACTION  QUERY  (SELECT) 

GENERATE  ACTION  PRESENT 

GENERATE  ACTION  SET 

GENERATE  ACTION  SIGNAL 

GENERATE  BEGINNING  OF  APPLICATION  OR 

REPORT 

GENERATE  CHANGE  DECLARATIONS 
GENERATE  DATA  BASE  RECORDS  AND  FILE 
DECLARATIONS 

GENERATE  PROCEDURE  "DOACT"  DO  ACTION 
GENERATE  DATA  DATA  STRUCTURES 
GENERATE  FORM  PATH 
GENERATE  FORM  DATA  STRUCTURES 
GENERATE  FORM  STRUCTURE  DATA 
INITIALIZATION 

GENERATE  INSERT  DECLARATIONS 
GENERATE  MAIN  PROGRAM 
GENERATE  NODUPLICATE  DECLARATIONS 
GENERATE  NEWPAG  PROCEDURE 
GENERATE  TRIGGER  ACTION  LIST 
GENERATE  TRIGGERS 

GET  THE  COLUMN  NAME  OF  A  TABLE. COLUMN  OR 
COLUMN  STRING 

RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM 
THE  USER 
GET  PATH 

GET  A  TABLE  NAME 
GET  FIELD  POINTER 

GENERATE  APPLICATION/REPORT  PROGRAM 
DETERMINE  IF  THERE  ARE  ANY  SELECT 
STATEMENTS 

THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN 
ITEM  WITHIN 

HAS  A  LOWER  FORM  WHICH  READS  THE  SAME  DATA 
RECORD? 

INDENT  A  LINE  OF  GENERATED  CODE 
INSERT  PROCEDURE 
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INSRSV  INSERT  RESOLVE 

INSWS  INSERT  WORKING  STORAGE  SECTION 

ISOPNE  DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 
MAKACT  MAKE  ACTION  LIST  ELEMENT 

MAKES  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

MAKES/CNU  C  NUMBERS 

MAKES/IND  INDENT 

MAKES/NUM  NUMBER  PICTURE  CLAUSE 

MAKINS  MAKE  INSERT 

MAKINT  MAKE  EXPRESSION  INTO  AN  INTEGER 
MAKPS  MAKES  THE  PRESENTATION  SCHEMA  RECORD 

STRUCTURE 

MAKQR  MAKE  QUALIFIED  REFERENCE 

MAKSTR  MAKE  EXPRESSION  INTO  A  STRING 
MAKWH  MAKE  WHERE 

MAKWHES  MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA 
VARIABLES 

MAKWHES/ C  COBOL  WHERE  ES 
MAKWHES/C  C  WHERE  ES 
MAKWHES/N  NUMBER  PICTURE  CLAUSE 
MAPDB  MAP  DATABASE 

MKINC  MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 

MAKING) 

MKPOS  MAKE  POSITION  NODE 

MLPFRM  MAKE  A  LIST  OF  PRESENTED  FORMS 

MYALLOC  MY  MALLOC 

NDMLGEN  NDML  COBOL  APPLICATION  GENERATOR 
NDMLLAB  GENERATE  LABELS 
NDMLLNK  LINKAGE  SECTION 
NULBLK  BLANK  FILL  A  STRING 
OPNFIL  GENERATE  OPEN  FILE  SECTION 

PEMAP  THE  PRESENTATION  SCHEMA  AND  THE  EXTERNAL 

SCHEMA  AND  MAPPING 

PROCGEN  PROCEDURE  DIVISION  GENERATE 

PSSTRC/CO  COBOL  SUBSTITUTE 
PSSTRC/CS  C  SUBSTITUTE 
PSSTRC/IN  INDENT 
READDB  READ  DATA  BASE 

RSETNDP  RESET  NODUPLICATE  FIELDS  TO  VALUE  OF 
NODUP%D 
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RSETSTAT  RESET  STATISTIC 

RWEXPD  REPORT  WRITER  EXPAND  ARRAYS 

RWOPN  REPORT  WRITER  OPEN  FORMS 

RWSP/FIXF  FIX  UP  A  FORM 

SAVEES  SAVE  ES  INFORMATION 

SELECT  GENERATE  SELECT  CODE 

SELGEN  SELECT  GENERATE 

SELLEN  COMPUTE  LENGTH  OF  SELECT  PS  RECORD 

SELMAP  MAP  SELECTED  DATA  TO  OUTPUT  RECORD 
SELOPN  SELECT  OPEN 

SELRSV  SELECT  RESOLVE 

SELWHR  SELECT  WHERE 

SELWS  SELECT  WORKING  STORAGE  SECTION 

SETNDP  SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY 
ARE  DUPLICATED 
STATRSV  STATISTIC  RESOLVE 

STDCODE  STANDARD  COBOL  CODE 

TRGRSV  TRIGGER  RESOLVE 

UQFOR  UNIVERSAL  QUALIFIER  FOR  LOOP 

UQPTH  UNIVERSAL  QUALIFIER  PATH 

USING  GENERATE  USING  SECTION 

VISITA  VISIT  ARRAYS  ON  THIS  FORM 

WINRSV  WINDOW  RESOLVE 

WRTEXP  WRITE  EXPRESSION 

YYLEX  LEXICAL  ANALYZER  FOR  FLAN 

YYPARSE  FLAN  PARSER 


SRVRET 

CDMESQY  PROGRAM  NAME  CDMESQY 


STDIO 

ADDCHK  ADD  POSITION  TO  CHECK  LIST 

ASSIGN  ASSIGN  FILE  SECTION 

BLDSUB  BUILD  SUBROUTINES 


3-38 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Where-include-f ile-used  List 

Include  Module  Module 

File  Name  Purpose 


BSCODE  BUILD  SUBROUTINE  CODE 

CCONV  C  CONVERSIONS 

CES  C  ES 

CESPS  C  ES  TO  PS 

CHKARY  CHECK  ARRAY 

CHKFLD  CHECK  FIELD 

CHKFRM  CHECK  FORM 

CHKGRP  CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 

CHKSIZE  CHECK  SIZE  OF  ITEMS  DOING  CONVERSIONS  ON 

CLRNDP  CLEAR  NODUPLICATE  FIELDS 

CLSFIL  CLOSE  FILES 

COBCONV  COBOL  CONVERSIONS 

COBES  COBOL  ES  RECORD 

COBESPS  COBOL  ES  TO  PS 

COBPE  COBOL  PE 

CPE  C  PE 

CSTASH  CHARACTER  STASH 

DASH  WRITE  DASH 

DATAGEN  DATA  DIVISION  GENERATE 

DBFREAD  GENERATE  DATA  BASE  FREAD 

ENDGEN  END  GERNERATE 

ESPSMAP  THE  EXTERNAL  SCHEMA  AND  PRESENTATION 

SCHEMA  MAPPING 
ESPSMAP/I  INDENT 

FD  FD  SECTION  DECLARATIONS 

FILELNK  FILE  LINKAGE  SECTION  GENERATE 

FLANCI  FLAN  CALLABLE  INTERFACE 

FLDTYP  FIELD  TYPE 

FNDATT  FIND  ATTRIBUTE 

GEN  GENERATE  A  LINE  OF  CODE 

GENBEG  GENERATE  BEGINNING  OF  APPLICATION  OR 

REPORT 

GENCHG  GENERATE  CHANGE  DECLARATIONS 

GENDB  GENERATE  DATA  BASE  RECORDS  AND  FILE 

DECLARATIONS 

GENDS  GENERATE  DATA  DATA  STRUCTURES 

GENFP  GENERATE  FORM  PATH 

GENFS  GENERATE  FORM  DATA  STRUCTURES 

GENFSD  GENERATE  FORM  STRUCTURE  DATA 

INITIALIZATION 
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GENINS  GENERATE  INSERT  DECLARATIONS 

GENMAIN  GENERATE  MAIN  PROGRAM 

GENNDP  GENERATE  NODUPLICATE  DECLARATIONS 

GENPAG  GENERATE  NEWPAG  PROCEDURE 

GETFILE  RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM 
THE  USER 

GFLDPT  GET  FIELD  POINTER 

GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 
HASDATA  DETERMINE  IF  THERE  ARE  ANY  SELECT 
STATEMENTS 

HA^TTEM  THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN 
ITEM  WITHIN 

HASLOWER  HAS  A  LOWER  FORM  WHICH  READS  THE  SAME  DATA 
RECORD? 

INDENT  INDENT  A  LINE  OF  GENERATED  CODE 

INSERT  INSERT  PROCEDURE 

INSWS  INSERT  WORKING  STORAGE  SECTION 

ISOPNE  DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 

MAKACT  MAKE  ACTION  LIST  ELEMENT 

MAKES  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

MAKES/CNU  C  NUMBERS 

MAKES/IND  INDENT 

MAKES/NUM  NUMBER  PICTURE  CLAUSE 

MAKINS  MAKE  INSERT 

MAKINT  MAKE  EXPRESSION  INTO  AN  INTEGER 

MAKPS  MAKES  THE  PRESENTATION  SCHEMA  RECORD 

STRUCTURE 

MAKQR  MAKE  QUALIFIED  REFERENCE 

MAKSTR  MAKE  EXPRESSION  INTO  A  STRING 
MAKWH  MAKE  WHERE 

MAKWHES  MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA 
VARIABLES 

MAKWHES/C  COBOL  WHERE  ES 
MAKWHES/C  C  WHERE  ES 
MAKWHES/N  NUMBER  PICTURE  CLAUSE 
MAPDB  MAP  DATABASE 

MKINC  MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 

MAKING) 

MKPOS  MAKE  POSITION  NODE 

MYALLOC  MY  MALLOC 
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NDMLGEN  NDML  COBOL  APPLICATION  GENERATOR 
NDMLLAB  GENERATE  LABELS 

NDMLLNK  LINKAGE  SECTION 

NULBLK  BLANK  FILL  A  STRING 

OPNFIL  GENERATE  OPEN  FILE  SECTION 

PEMAP  THE  PRESENTATION  SCHEMA  AND  THE  EXTERNAL 

SCHEMA  AND  MAPPING 

PROCGEN  PROCEDURE  DIVISION  GENERATE 
PSSTRC/CO  COBOL  SUBSTITUTE 
PSSTRC/CS  C  SUBSTITUTE 
PSSTRC/IN  INDENT 
READDB  READ  DATA  BASE 

RSETNDP  RESET  NODUPLICATE  FIELDS  TO  VALUE  OF 
NODUPID 

SAVEES  SAVE  ES  INFORMATION 
SELECT  GENERATE  SELECT  CODE 
SELGEN  SELECT  GENERATE 

S ELLEN  COMPUTE  LENGTH  OF  SELECT  PS  RECORD 

SELMAP  MAP  SELECTED  DATA  TO  OUTPUT  RECORD 

SELWS  SELECT  WORKING  STORAGE  SECTION 

SETNDP  SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY 
ARE  DUPLICATED 

STDCODE  STANDARD  COBOL  CODE 

USING  GENERATE  USING  SECTION 

VISITA  VISIT  ARRAYS  ON  THIS  FORM 
WRTEXP  WRITE  EXPRESSION 
WRTFRM  WRITE  FORM 
WRTFRM/DB  DEFAULT  BUFFER  CLOSE 
WRTFRM/ FO  INSERT  FORMAT  CODES 
WRTFRM/TB  TEXT  BUFFER  CLOSE 
WRTFRM/WR  WRITE  DEFAULT  BUFFER 
WRTFRM/WR  WRITE  FIELD 
WRTFRM/WR  WRITE  TEXT  BUFFER 
WRTFRM/WR  WRITE  TEXT 

YYLEX  LEXICAL  ANALYZER  FOR  FLAN 

YYPARSE  FLAN  PARSER 
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STDTYP 


ACTRSV 

ADDCHK 

ASSIGN 

BLDSUB 

BSCODE 

CALCSTAT 

CCONV 

CES 

CESPS 

CHKARY 

CHKFLD 

CHKFRM 

CHKGRP 

CHKSIZE 

CLRNDP 

CLSFIL 

COBCONV 

COBES 

COBESPS 

COBPE 

CPE 

CSTASH 

CTLRSV 

DASH 

DATAGEH 

DBFREAD 

DCLINDX 

ENDGEN 

ERROR 

ESPSMAP 

ESPSMAP/I 

FATAL 

FD 

FILELNK 

FLANCI 

FLDRSV 

FLDTYP 

FNDATT 


ACTION  RESOLVE 
ADD  POSITION  TO  CHECK  LIST 
ASSIGN  FILE  SECTION 
BUILD  SUBROUTINES 
BUILD  SUBROUTINE  CODE 
CALCULATE  STATISTIC 
C  CONVERSIONS 
C  ES 

C  ES  TO  PS 
CHECK  ARRAY 
CHECK  FIELD 
CHECK  FORM 

CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 

CHECK  SIZE  OF  ITEMS  DOING  CONVERSIONS  ON 

CLEAR  NODUPLICATE  FIELDS 

CLOSE  FILES 

COBOL  CONVERSIONS 

COBOL  ES  RECORD 

COBOL  ES  TO  PS 

COBOL  PE 

C  PE 

CHARACTER  STASH 
CONTROL  RESOLVE 
WRITE  DASH 

DATA  DIVISION  GENERATE 
GENERATE  DATA  BASE  FREAD 
DECLARE  INDEX  VARIABLES 
END  GERNERATE 
ISSUE  ERROR  MESSAGE 

THE  EXTERNAL  SCHEMA  AND  PRESENTATION 

SCHEMA  MAPPING 

INDENT 

ISSUE  FATAL  ERROR  MESSAGE 

FD  SECTION  DECLARATIONS 

FILE  LINKAGE  SECTION  GENERATE 

FLAN  CALLABLE  INTERFACE 

FIELD  RESOLVE 

FIELD  TYPE 

FIND  ATTRIBUTE 
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FNDFRM  FIND  FORM 

FRMPDAT  FORM  PDATA 

FRNTND  FORMS  FRONT  END  TO  APPLICATIC  GENERATOR 
GEN  GENERATE  A  LINE  OF  CODE 

GENAA  GENERATE  PROCEDURE  "ADDACT"  ADD  AN  ACTION 

GENAAL  GENERATE  PROCEDURE  "ADDAL"  ADD  ACTION  LIST 

GENACT  GENERATE  ACTIONS 

GENAE  GENERATE  ACTION  EXIT 

GENAH  GENERATE  ACTION  HELP 

GENAI  GENERATE  ACTION  INSERT 

GENAL  GENERATE  ACTION  LIST 

GENAP  GENERATE  ACTION  PAGE 

GENAQ  GENERATE  ACTION  QUERY  (SELECT) 

GENAR  GENERATE  ACTION  PRESENT 

GENAS  GENERATE  ACTION  SET 

GENAT  GENERATE  ACTION  SIGNAL 

GENBEG  GENERATE  BEGINNING  OF  APPLICATION  OR 
REPORT 

GENCHG  GENERATE  CHANGE  DECLARATIONS 

GENDB  GENERATE  DATA  BASE  RECORDS  AND  FILE 

DECLARATIONS 

GENDOA  GENERATE  PROCEDURE  "DOACT"  DO  ACTION 
GENDS  GENERATE  DATA  DATA  STRUCTURES 

GENFP  GENERATE  FORM  PATH 

GENFS  GENERATE  FORM  DATA  STRUCTURES 

GENFSD  GENERATE  FORM  STRUCTURE  DATA 

INITIALIZATION 

GENINS  GENERATE  INSERT  DECLARATIONS 

GENMAIN  GENERATE  MAIN  PROGRAM 

GENNDP  GENERATE  NODUPLICATE  DECLARATIONS 

GENPAG  GENERATE  NEWPAG  PROCEDURE 

CENTAL  GENERATE  TRIGGER  ACTION  LIST 

GENTRG  GENERATE  TRIGGERS 

GETCOL  GET  THE  COLUMN  NAME  OF  A  TABLE. COLUMN  OR 

COLUMN  STRING 

GETFILE  RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM 
THE  USER 
GETPTH  GET  PATH 

GETTBL  GET  A  TABLE  NAME 

GFLDPT  GET  FIELD  POINTER 
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GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 
HASDATA  DETERMINE  IF  THERE  ARE  ANY  SELECT 
STATEMENTS 

HASITEM  THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN 
ITEM  WITHIN 

HAS LOWER  HAS  A  LOWER  FORM  WHICH  READS  THE  SAME  DATA 
RECORD? 

INDENT  INDENT  A  LINE  OF  GENERATED  CODE 

INSERT  INSERT  PROCEDURE 

INSRSV  INSERT  RESOLVE 

INSWS  INSERT  WORKING  STORAGE  SECTION 

ISOPNE  DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 
MAKACT  MAKE  ACTION  LIST  ELEMENT 

MAKES  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

MAKES/CNU  C  NUMBERS 
MAKES/IND  INDENT 

MAKES/NUM  NUMBER  PICTURE  CLAUSE 
MAKINS  MAKE  INSERT 

MAKINT  MAKE  EXPRESSION  INTO  AN  INTEGER 
MAKPS  MAKES  THE  PRESENTATION  SCHEMA  RECORD 

STRUCTURE 

MAKQR  MAKE  QUALIFIED  REFERENCE 

MAKSTR  MAKE  EXPRESSION  INTO  A  STRING 
MAKWH  MAKE  WHERE 

MAKWHES  MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA 
VARIABLES 

MAKWHES/C  COBOL  WHERE  ES 
MAKWHES/C  C  WHERE  ES 
MAKWHES/N  NUMBER  PICTURE  CLAUSE 
MAPDB  MAP  DATABASE 

MKINC  MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 

MAKING) 

MKPOS  MAKE  POSITION  NODE 

MLPFRM  MAKE  A  LIST  OF  PRESENTED  FORMS 

MYALLOC  MY  MALLOC 

NDMLGEN  NDML  COBOL  APPLICATION  GENERATOR 
NDMLLAB  GENERATE  LABELS 
NDMLLNK  LINKAGE  SECTION 
NULBLK  BLANK  FILL  A  STRING 
OPNFIL  GENERATE  OPEN  FILE  SECTION 
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PEMAP  THE  PRESENTATION  SCHEMA  AND  THE  EXTERNAL 

SCHEMA  AND  MAPPING 

PROCGEN  PROCEDURE  DIVISION  GENERATE 
PSSTRC/CO  COBOL  SUBSTITUTE 
PSSTRC/CS  C  SUBSTITUTE 
PSSTRC/IN  INDENT 
READDB  READ  DATA  BASE 

RSETNDP  RESET  NODUPLICATE  FIELDS  TO  VALUE  OF 
NODUP%D 

RSETSTAT  RESET  STATISTIC 

RWEXPD  REPORT  WRITER  EXPAND  ARRAYS 

RWOPN  REPORT  WRITER  OPEN  FORMS 

RWSP/FIXF  FIX  UP  A  FORM 

SAVEES  SAVE  ES  INFORMATION 

SELECT  GENERATE  SELECT  CODE 

SELGEN  SELECT  GENERATE 

SELLEN  COMPUTE  LENGTH  OF  SELECT  PS  RECORD 

SELMAP  MAP  SELECTED  DATA  TO  OUTPUT  RECORD 
SELOPN  SELECT  OPEN 
SELRSV  SELECT  RESOLVE 
SELWHR  SELECT  WHERE 

SELWS  SELECT  WORKING  STORAGE  SECTION 

SETNDP  SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY 
ARE  DUPLICATED 
STATRSV  STATISTIC  RESOLVE 

STDCODE  STANDARD  COBOL  CODE 

TRGRSV  TRIGGER  RESOLVE 

UQFOR  UNIVERSAL  QUALIFIER  FOR  LOOP 

UQPTH  UNIVERSAL  QUALIFIER  PATH 

USING  GENERATE  USING  SECTION 

VISITA  VISIT  ARRAYS  ON  THIS  FORM 

WARNING  ISSUE  WARNING  MESSAGE 

WINRSV  WINDOW  RESOLVE 

WRTEXP  WRITE  EXPRESSION 

WRTFRM  WRITE  FORM 

WRTFRM/DB  DEFAULT  BUFFER  CLOSE 

WPTFRM/FO  INSERT  FORMAT  CODES 
WRTFRM/TB  TEXT  BUFFER  CLOSE 
WRTFRM/WR  WRITE  DEFAULT  BUFFER 
WRTFRM/WR  WRITE  FIELD 


3-45 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Where-include-f ile-used  List 

Include  Module  Module 

File  Name  Purpose 


WRTFRM/WR  WRITE  TEXT  BUFFER 
WRTFRM/WR  WRITE  TEXT 
'lYLEX  LEXICAL  ANALYZER  FOR  FLAN 

YYPARSE  FLAN  PARSER 
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ABS 

CHKARY  CHECK  ARRAY 

CHKFRM  CHECK  FORM 

CHKFRM  CHECK  FORM 

RWEXPD  REPORT  WRITER  EXPAND  ARRAYS 


ADDFRM 

FRNTND  FORMS  FRONT  END  TO  APPLICATION  GENERATOR 


ATOF 

YYLEX  LEXICAL  ANALYZER  FOR  FLAN 


ATOI 

CCONV  C  CONVERSIONS 

CES  C  ES 

COBCONV  COBOL  CONVERSIONS 

COBES  COBOL  ES  RECORD 

SAVEES  SAVE  ES  INFORMATION 

YYLEX  LEXICAL  ANALYZER  FOR  FLAN 


BLEM 

CHKFLD  CHECK  FIELD 

CHKSIZE  CHECK  SIZE  OF  ITEMS  DOING  CONVERSIONS  ON 

MKINC  MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 

MAKING) 

PSSTRC/COBCOBOL  SUBSTITUTE 
PSSTRC/CSUC  SUBSTITUTE 

SELLEN  COMPUTE  LENGTH  OF  SELECT  PS  RECORD 


CALL.OC 
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GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 


COPFLD 

RWEXPD  REPORT  WRITER  EXPAND  ARRAYS 
RWSP/FIXFRFIX  UP  A  FORM 
WINRSV  WINDOW  RESOLVE 


DELFLD 

FLANCI  FLAN  CALLABLE  INTERFACE 


ERRPRO 

CDMESQY  PROGRAM  NAME  CDMESQY 


ESCPY 

CCONV  C  CONVERSIONS 

CES  C  ES 

COBCONV  COBOL  CONVERSIONS 
COBES  COBOL  ES  RECORD 

GETTBL  GET  A  TABLE  NAME 

SAVEES  SAVE  ES  INFORMATION 


1 C  LOS  L 

NDMLGEN  NDML  COBOL  APPLICATION  GENERATOR 

WRTFRM  WRITE  FORM 


FOPEN 

GETFILE  RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM 
THE  USER 
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GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 
NDMLGEN  NDML  COBOL  APPLICATION  GENERATOR 

WRTFRM  WRITE  FOPJ4 


FPRINTF 

ASSIGN  ASSIGN  FILE  SECTION 

CCONV  C  CONVERSIONS 

CES  C  ES 

CHKSIZE  CHECK  SIZE  OF  ITEMS  DOING  CONVERSIONS  ON 

CLSFIL  CLOSE  FILES 

COBCONV  COBOL  CONVERSIONS 

COBES  COBOL  ES  RECORD 

COBESPS  COBOL  ES  TO  PS 

COBPE  COBOL  PE 

DATAGEN  DATA  DIVISION  GENERATE 

ENDGEN  END  GERNERATE 

FD  FD  SECTION  DECLARATIONS 

FILELNK  FILE  LINKAGE  SECTION  GENERATE 

GEN  GENERATE  A  LINE  OF  CODE 

INSERT  INSERT  PROCEDURE 

INSWS  INSERT  WORKING  STORAGE  SECTION 

MAKES/CNUMC  NUMBERS 

MAKES/NUMPNUMBER  PICTURE  CLAUSE 

MAKINS  MAKE  INSERT 

MAKWH  MAKE  WHERE 

MAKWHES  MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA 
VARIABLES 

MAKWHES/COCOBOL  WHERE  ES 

MAKWHES/NUNUMBER  PICTURE  CLAUSE 

NDMLLAB  GENERATE  LABELS 

OPNFIL  GENERATE  OPEN  FILE  SECTION 

PROCGEN  PROCEDURE  DIVISION  GENERATE 

PSSTRC/COBCOBOL  SUBSTITUTE 

PSSTRC/CSUC  SUBSTITUTE 

SELGEN  SELECT  GENERATE 

SELWS  SELECT  WORKING  STORAGE  SECTION 

STDCODE  STANDARD  COBOL  CODE 

USING  GENERATE  USING  SECTION 
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FREE 

CHKFLD  CHECK  FIELD 

CHKFRM  CHECK  FORM 

WINRSV  WINDOW  RESOLVE 

WRTEXP  WRITE  EXPRESSION 

YY PARSE  FLAN  PARSER 


FWRITE 

WRTFRM  WRITE  FORM 
WRTFRM/DBFDEFAULT  BUFFER  CLOSE 
WRTFRM/TBFTEXT  BUFFER  CLOSE 
WRTFRM/WRTWRITE  DEFAULT  BUFFER 
WRTFRM/WRTWRITE  FIELD 
WRTFRM/WRTWRITE  TEXT  BUFFER 
WRTFRM/WRTWRITE  TEXT 


GDATA 

FRNTND  FORMS  FRONT  END  TO  APPLICATION  GENERATOR 


GETC 

YYLEX  LEXICAL  ANALYZER  FOR  FLAN 


INITAL 

FRNTND  FORMS  FRONT  END  TO  APPLICATION  GENERATOR 


IN ITFP 

FRNTND  FORMS  FRONT  END  TO  APPLICATION  GENERATOR 
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INSMAP 


ISALNUM 


ISALPHA 


ISDIGIT 


ISSPACE 


MAKFLD 


MALLOC 


PROCGEN 


YYLEX 


YYLEX 


YYLEX 


YYLEX 


YY PARSE 


MLPFRM 

MYALLOC 

UQPTH 

WINRSV 


PROCEDURE  DIVISION  GENERATE 


LEXICAL  ANALYZER  FOR  FLAN 


LEXICAL  ANALYZER  FOR  FLAN 


LEXICAL  ANALYZER  FOR  FLAN 


LEXICAL  ANALYZER  FOR  FLAN 


FLAN  PARSER 


MAKE  A  LIST  OF  PRESENTED  FORMS 
MY  MALLOC 

UNIVERSAL  QUALIFIER  PATH 
WINDOW  RESOLVE 
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HAP 

PROCGEN  PROCEDURE  DIVISION  GENERATE 


MAX 

CHKFLD  CHECK  FIELD 

CHKFRM  CHECK  FORM 

DCLINDX  DECLARE  INDEX  VARIABLES 


MEMCMP 

FRNTND  FORMS  FRONT  END  TO  APPLICATION  GENERATOR 


MEMCPy 

CHKFLD  CHECK  FIELD 

WRTEXP  WRITE  EXPRESSION 

WRTFRM/WRTWRITE  FIELD 
YYPARSE  FLAN  PARSER 


t^lEMSET 

CHKFLD  CHECK  FIELD 


OISCR 

FRNTND  FORMS  FRONT  END  TO  APPLICATION  GENERATOR 
GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 


PMSGLC 
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FRNTND  FORMS  FRONT  END  TO  APPLICATION  GENERATOR 
GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 


PMSGLS 

ERROR  ISSUE  ERROR  MESSAGE 

FATAL  ISSUE  FATAL  ERROR  MESSAGE 

WARNING  ISSUE  WARNING  MESSAGE 


PRINTF 

YYPARSE  FLAN  PARSER 


PSESMAP 

PROCGEN  PROCEDURE  DIVISION  GENERATE 


PTHPTR 

GETPTH  GET  PATH 

UQPTH  UNIVERSAL  QUALIFIER  PATH 


PUTC 

ESPSMAP/ ININDENT 

INDENT  INDENT  A  LINE  OF  GENERATED  CODE 

MAKES/ INDEINDENT 

PSSTRC/INDINDENT 


SPRINTF 

BSCODE  BUILD  SUBROUTINE  CODE 
CALCSTAT  CALCUIJ^TE  STATISTIC 

CHKGRP  CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 
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Module  Name  Purpose 


CLRNDP 

DBFREAD 

DCLINDX 

ERROR 

FATAL 

FRMPDAT 

FRNTND 

GENAAL 

GENAH 

GENAI 

GENAP 

GENAQ 

GENAR 

GENAS 

GENAT 

GENBEG 

GENCHG 

GENDB 

GENDOA 

GENDS 

GENFP 

GENFS 

GENFSD 

GENINS 

GENMAIN 

GENNDP 

GENTRG 

GETFILE 

MAKQR 

MAPDB 

MKINC 

NDMLGEN 

RSETNDP 

RSETSTAT 


CLEAR  NODUPLICATE  FIELDS 
GENERATE  DATA  BASE  FREAD 
DECLARE  INDEX  VARIABLES 
ISSUE  ERROR  MESSAGE 
ISSUE  FATAL  ERROR  MESSAGE 
FORM  PDATA 

FORMS  FRONT  END  TO  APPLICATION  GENERATOR 

GENERATE  PROCEDURE  "ADDAL"  ADD  ACTION  LIST 

GENERATE  ACTION  HELP 

GENERATE  ACTION  INSERT 

GENERATE  ACTION  PAGE 

GENERATE  ACTION  QUERY  (SELECT) 

GENERATE  ACTION  PRESENT 

GENERATE  ACTION  SET 

GENERATE  ACTION  SIGNAL 

GENERATE  BEGINNING  OF  APPLICATION  OR 

REPORT 

GENERATE  CHANGE  DECLARATIONS 
GENERATE  DATA  BASE  RECORDS  AND  FILE 
DECLARATIONS 

GENERATE  PROCEDURE  "DOACT"  DO  ACTION 
GENERATE  DATA  DATA  STRUCTURES 
GENERATE  FORM  PATH 
GENERATE  FORM  DATA  STRUCTURES 
GENERATE  FORM  STRUCTURE  DATA 
INITIALIZATION 

GENERATE  INSERT  DECLARATIONS 
GENERATE  MAIN  PROGRAM 
GENERATE  NODUPLICATE  DECLARATIONS 
GENERATE  TRIGGERS 

RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM 
THE  USER 

MAKE  QUALIFIED  REFERENCE 
MAP  DATABASE 

MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 
MAKING) 

NDML  COBOL  APPLICATION  GENERATOR 
RESET  NODUPLICATE  FIELDS  TO  VALUE  OF 
NODUP%D 

RESET  STATISTIC 
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APPLICATION  GENERATOR  Where-external-routine-used  List 

System  Module  Module 

Module  Name  Purpose 


SELGEN  SELECT  GENERATE 

SELOPN  SELECT  OPEN 

SELWHR  SELECT  WHERE 

SETNDP  SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY 

ARE  DUPLICATED 

STDCODE  STANDARD  COBOL  CODE 

UQFOR  UNIVERSAL  QUALIFIER  FOR  LOOP 

VISITA  VISIT  ARRAYS  ON  THIS  FORM 

WARNING  ISSUE  WARNING  MESSAGE 

WRTEXP  WRITE  EXPRESSION 

WRTFRM  WRITE  FORM 

YYPARSE  FLAN  PARSER 


STRASN 

CHKARY  CHECK  ARRAY 

CHKFRM  CHECK  FORM 

RWEXPD  REPORT  WRITER  EXPAND  ARRAYS 

WRTFRM  WRITE  FORM 


STRCAT 

DCLINDX  DECLARE  INDEX  VARIABLES 

GENTRG  GENERATE  TRIGGERS 

GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 

MAKES/CNUMC  NUMBERS 

MAKQR  MAKE  QUALIFIED  REFERENCE 

YYPARSE  FLA.N  PARSER 


S TRCHR 

DASH  WRITE  DASH 

FRNTND  FORMS  FRONT  END  TO  APPLICATION  GENERATOR 

GENDOA  GENERATE  PROCEDURE  "DOACT"  DO  ACTION 

GENMAIN  GENERATE  MAIN  PROGRAM 
GENTRG  GENERATF  TRIGGERS 
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APPLICATION  GENERATOR  Where-ex terna 1 - rou t i ne-used  List 


System 

Module 


Module 

Name 


Module 

Purpose 


GETCOL 

GETPTH 

GLTTBL 

GRP/MAIN 

MAPDB 

NULBLK 

UQPTH 

YYPARSE 


GET  THE  COLUMN  NAME  OF  A  TABLE. COLUMN  OR 
COLUMN  STRING 
GET  PATH 

GET  A  TABLE  NAME 

GENERATE  APPLICATION/REPORT  PROGRAM 

MAP  DATABASE 

BLANK  FILL  A  STRING 

UNIVERSAL  QUALIFIER  PATH 

FLAN  PARSER 


o  I'RCMP 


FNDATT  FIND  ATTRIBUTE 

FNDFRM  FIND  FORM 

GENAR  GENERATE  ACTION  PRESENT 

GENTRG  GENERATE  TRIGGERS 

GETTBL  GET  A  TABLE  NAME 

GFLDPT  GET  FIELD  POINTER 

RWSP/FIXFRFIX  UP  A  FORM 

SELWS  SELECT  WORKING  STORAGE  SECTION 

YYLEX  LEXICAL  ANALYZER  FOR  FLAN 

YYPARSE  FLAN  PARSER 


■lilkCPY 


C3TASH 

DCLINDX 

GENAS 

GENTRG 

GETCOL 


GET Pin 

GETTBL 

GRP/ MAIN 

INSWS 

MAKES 

MAKQR 

NULBLK 


CHARACTER  STASH 
DECLARE  INDEX  VARIABLES 
GENERATE  ACTION  SET 
GENERATE  TRIGGERS 

GET  THE  COLUMN  NAME  OF  A  TABLE . COLUMN  OR 
COLUMN  STRING 
GET  PATH 

GET  A  TABLE  NAME 

GENERATE  APPLICATION/REPORT  PROGRAM 

INSERT  WORKING  STORAGE  SECTION 

MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

MAKE  QUALIFIED  REFERENCE 

BLANK  FILL  A  STRING 
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APPLICATION  GENERATOR  Where-external-routine-used  List 

System  Module  Module 

Module  Name  Purpose 


SELGEN  SELECT  GENERATE 

SELWS  SELECT  WORKING  STORAGE  SECTION 

UQPTH  UNIVERSAL  QUALIFIER  PATH 

WRTFRM  WRITE  FORM 

WRTFRM/WRTWRITE  FIELD 

YY PARSE  FLAN  PARSER 


STRLEN 

CHKFLD  CHECK  FIELD 

CHKFRM  CHECK  FORM 

CSTASH  CHARACTER  STASH 

DCLINDX  DECLARE  INDEX  VARIABLES 
ERROR  ISSUE  ERROR  MESSAGE 

FATAL  ISSUE  FATAL  ERROR  MESSAGE 

GENAS  GENERATE  ACTION  SET 

GENFSD  GENERATE  FORM  STRUCTURE  DATA 

INITIALIZATION 
GENTRG  GENERATE  TRIGGERS 

MAKES  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

MAPDB  MAP  DATABASE 

MKINC  MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 

MAKING) 

RSETNDP  RESET  NODUPLICATE  FIELDS  TO  VALUE  OF 
NODUP%D 

SAVEES  SAVE  ES  INFORMATION 

SETNDP  SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY 
ARE  DUPLICATED 

VISITA  VISIT  ARRAYS  ON  THIS  FORM 

WARNING  ISSUE  WARNING  MESSAGE 

WRTEXP  WRITE  EXPRESSION 

WRTFRM  WRITE  FORM 

WRTFRM/WRTWRITE  TEXT 
YYPARSE  FLAN  PARSER 


STRMCMP 

CCONV  C  CONVERSIONS 
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APPLICATION  GENERATOR  Where-external-routine-used  List 

System  Module  Module 

Module  Name  Purpose 


SAVEES  SAVE  ES  INFORMATION 


STRNCPY 

MAKES  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

NDMLGEN  NDML  COBOL  APPLICATION  GENERATOR 
WRTFRM/WRTWRITE  FIELD 
YYPARSE  FLAN  PARSER 


STRSPN 

GENAS  GENERATE  ACTION  SET 


S THU PC 

GETPTH  GET  PATH 

STDCODE  STANDARD  COBOL  CODE 

YYPARSE  FLAN  PARSER 


CHKFLD  CHECK  FIELD 

NDMLGEN  NDML  COBOL  APPLICATION  GENERATOR 

WRTFRM  WRITE  FORM 


TERMLP 

GRP/MAIN  GENERATE  APPLICATION/REPORT  PROGRAM 


rou  ppLR 

YYLEX  LEXICAL  ANALYZER  FOR  FLAN 
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APPLICATION  GENERATOR  Where-external-routine-used  List 

System  Module  Module 

Module  Name  Purpose 


TRMNAT 


TRMNDML 


UNGETC 


YY ERROR 


FRNTND 


GRP/MAIN 


YYLEX 


YY PARSE 


FORMS  FRONT  END  TO  APPLICATION  GENERATOR 


GENERATE  APPLICATION/REPORT  PROGRAM 


LEXICAL  ANALYZER  FOR  FLAN 


FLAN  PARSER 
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3.10.7  Main  Program  Parts  List 

The  following  lists  each  Main  Program  listed  in  3.10.1 
and  all  the  modules  which  are  called  either  by  that  module 
itself  or  by  any  of  the  documented  modules  which  it  calls.  it 
is  possible  for  a  non-main  module  to  be  listed  more  that  once 
if  it  is  called  by  multiple  modules.  The  called  modules,  in 
this  case  known  as  program  parts,  are  marked  as  to  whether 
they  are  documented  here.  If  so,  the  phrase  "well-defined 
module"  appears  by  the  module  name,  if  not  it  is  an  "external 
"routine".  The  Purpose  of  the  Main  Program  module  is  listed 
as  well. 
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APPLICATION  GENERATOR  Main  Program  Parts  List 

Main  Pgm 

Module 

Module 

Name 

Name 

Type 

GRP/MAIN 

Purpose-- 

->GENERATE  APPLICATION/REPORT 

PROGRAM 

ABS 

External  routine 

ACTRSV 

Well-defined  module 

ADDCHK 

Well-defined  module 

ADDFRM 

External  routine 

ASSIGN 

Well-defined  module 

ATOF 

External  routine 

ATOI 

External  routine 

BLDSUB 

Well-defined  module 

BLEN 

External  routine 

BSCODE 

Well-defined  module 

CALCSTAT 

Well-defined  module 

CALLOC 

External  routine 

CCONV 

Well-defined  module 

CDMESQY 

Well-defined  module 

CES 

Well-defined  module 

CESPS 

Well-defined  module 

CHKARY 

Well-defined  module 

CHKFLD 

Well-defined  module 

CHKFRM 

Well-defined  module 

CHKGRP 

Well-defined  module 

CHKSIZE 

Well-defined  module 

CLRNDP 

Well-defined  module 

CLSFIL 

Well-defined  module 

COBCONV 

Well-defined  module 

COBES 

Well-defined  module 

COBESPS 

Well-defined  module 

COBPE 

Well-defined  module 

COPFLD 

External  routine 

CPE 

Well-defined  module 

CSTASH 

Well-defined  module 

CTLRSV 

Well-defined  module 

DASH 

Well-defined  module 

DATAGEN 

Well-defined  module 

DBFREAD 

Well-defined  module 

DCLINDX 

Well-defined  module 

DELFLD 

External  routine 

ENDGEN 

Well-defined  module 

ERROR 

Well-defined  module 
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APPLICATION  GENERATOR  Main  Program  Parts  List 


Main  Pgm  Module 
Name  Name 


Module 

Type 


ERRPRO 

ESCPY 

ESPSMAP 

ESPSMAP/ INDENT 

FATAL 

FCLOSE 

FD 

FILELNK 

FLANCI 

FLDRSV 

FLDTYP 

FNDATT 

FNDFRM 

FOPEN 

FPRINTF 

FREE 

FRMPDAT 

FRNTND 

FWRITE 

GDATA 

GEN 

GENAA 

GENAAL 

GENACT 

GENAE 

GENAH 

GENAI 

GENAL 

GENAP 

GENAQ 

GENAR 

GENAS 

GENAT 

GENBEG 

GENCHG 

GENDB 

GENDOA 

GENDS 

GENFP 

GENFS 


External  routine 
External  routine 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
External  routine 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
External  routine 
External  routine 
External  routine 
Well-defined  modul 
Well-defined  modul 
External  routine 
External  routine 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
VJell-def ined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 


e 

e 

e 

e 

e 

e 

e 

e 

e 

e 


e 

e 


e 

e 

e 

e 

e 

e 

e 

e 

e 

e 

e 

e 

e 

e 

e 

e 

e 

e 

e 

e 
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APPLICATION  GENERATOR 

Main  Pgm  Module 
Name  Name 


GENFSD 

GENINS 

GENMAIN 

GENNDP 

GENPAG 

GENTAL 

GENTRG 

GETC 

GETCOL 

GETFILE 

GETPTH 

GETTBL 

GFLDPT 

HAS DATA 

HASITEM 

HASLOWER 

INDENT 

INITAL 

INIT^P 

INSERT 

INSMAP 

INSRSV 

INSWS 

ISALNUM 

ISALPHA 

ISDIGIT 

ISOPNE 

ISSPACE 

MAKACT 

MAKES 

MAKES/CNUMPIC 

MAKES/ INDENT 

MAKES/NUMPIC 

MAKFLD 

MAKINS 

MAKINT 

MAKPS 

MAKQR 

MAKSTR 

MAKWH 


Main  Program  Parts  List 

Module 

Type 


Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
External  routine 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
External  routine 
External  routine 
Well-defined  module 
External  routine 
Well-defined  module 
Well-defined  module 
External  routine 
External  routine 
External  routine 
Well-defined  module 
External  routine 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
External  routine 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
V'/e  11 -defined  module 
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APPLICATION  GENERATOR  Main  Program  Parts  List 

Mam  Pgm  Module  Module 

.’.'ar.G  Name  Type 


MAKWHES 

MAKWHES/COBWHES 

MAKWHES/ CWHES 

MAKWHES/NUMPIC 

MALLOC 

MAP 

MAPDB 

MAX 

MEMCMP 

MEMCPY 

MEMSET 

MKINC 

MKPOS 

MLPFRM 

MYALLOC 

NDMLGEN 

NDMLLAB 

NDMLLNK 

NULBLK 

OISCR 

OPNFIL 

PEMAP 

PMSGLC 

PMSGLS 

PR I NT F 

PROCGEN 

PSESMAP 

PSSTRC/COBSUB 

PSSTRC/CSUB 

PSSTRC/ INDENT 

PTHPTR 

PUTC 

READDB 

RSETNDP 

RSETSTAa 

RWEXPD 

RWOPN 

RWSP/FIXFRM 

SAVEES 

SELECT 


Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
External  routine 
External  routine 
Well-defined  modul 
External  routine 
External  routine 
External  routine 
External  routine 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
t‘’oll-def ined  modul 
Well-defined  modul 
Well-defined  modul 
External  routine 
Well-defined  modul 
Well-defined  modul 
External  routine 
External  routine 
External  routine 
Well-defined  modul 
External  routine 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
External  routine 
External  routine 
Well-defined  modul 
Well-defined  m.odul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 
Well-defined  modul 


e 

e 

e 

e 


e 


e 

e 

e 

e 

e 

e 

e 

e 

e 

e 


e 

e 

e 

e 


e 

e 

e 

e 

e 

e 

e 

e 


3-65 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Main  Program  Parts  List 

Main  Pgm  Module  Module 

Name  Name  Type 


SELGEN 

SELLEN 

SELMAP 

SELOPN 

SELRSV 

SELWHR 

SELWS 

SETNDP 

SPRINTF 

STATRSV 

STDCODE 

STRASN 

STRCAT 

STRCHR 

STRCMP 

STRCPY 

STRLEN 

STRNCMP 

STRNCPY 

STRSPN 

STRUPC 

SYSMSG 

TERMFP 

TOUPPER 

TRGRSV 

TRMNAT 

TRMNDML 

UNGETC 

UQFOR 

UQPTH 

USING 

VISITA 

WARNING 

WINRSV 

WRTEXP 

WRTFRM 

WRTFRM/DBFCLOS 
WRTFRM/ FORMAT 
WRTFRM/TBFCLOS 
WRTFRM/WRTDBF 


Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
External  routine 
Well-defined  module 
Well-defined  module 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
Well-defined  module 
External  routine 
External  routine 
External  routine 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
Well-defined  module 
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APPLICATION  GENERATOR  Main  Program  Parts  List 


Main  Pgm  Module 
Name  Name 


Module 

Type 


WRTFRM/WRTFLD  Well-defined  module 

WRTFRM/WRTTBF  Well-defined  module 

WRTFRM/WRTTXT  Well-defined  module 

YYERROR  External  routine 

YYLEX  Well-defined  module 

YYPARSE  Well-defined  module 
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3.10.8  Module  Documentation 

The  following  documentation  describes  information 
which  is  specific  to  each  individual  module  being  documented 
in  this  specification  as  listed  in  section  3.10.2.  It 
provides  a  compact  way  of  getting  information  that  would  be 
otherwise  buried  within  each  module's  source  code. 

The  specific  items  in  this  module  documentation  have  the 
following  meanings: 

NAME:  Name  of  program  Module. 

PURPOSE:  Purpose  of  Module  as  detailed  in  the 

source  code. 

LAr-iGUAGE:  Programming  language  source  code  is 

written  in. 

The  choices  are: 

VAX- 11  FORTRAN 

C  (I/S-1  Workbench  'C') 

VAX-11  COBOL 

MODULE  TYPE:  Whether  a  Program,  Subroutine,  or 

Function . 

SOURCE  FILE:  Name  of  Source  File  from  file 

specification. 

SOURCE  FILE  TYPE:  Source  File  Extension  from  file 

specification. 

HOST:  Whether  this  is  a  host-dependent 

routine  (VAX  or  IBM)  or  blank  if 
host-independent . 

SUBSYSTE.M:  IISS  sub-system  this  file  resides  in. 

SUEiDIRECTORY :  Sub-directory  of  that  subsystem  in 

which  this  file  resides. 

DOCUMENTATION  GROUP:  Name  of  documentation  group  of  which 

this  source  file  is  a  member. 

DESGRI ption :  A  description  of  the  module  as  otained 

from  the  source  code. 

ARGUMENTS:  The  arguments  with  which  this  routine 

is  called  if  it  is  a  Subroutine  or  a 
Function . 


INCLUDE  EILES:  A  list  of  all  the  files  that  are 

included  into  this  module  as  well  as 
their  purposes. 
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ROUTINES  CALLED:  Subroutines  or  Functions,  either 

documented  or  external,  called  by 
this  module,  if  any. 

CALLED  DIRECTLY  BY:  The  documented  routines  which  call 

this  module,  if  any. 

USED  IN  MAIN  PROGRAM(S) :  The  documented  Main  Programs  which 

contain  this  module  in  their  parts 
list  according  to  the  list  in  section 
3.10.7. 


The  Module  Documentation  is  arranged  alphabetically  according 
to  Module  Name. 
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APPLICATION  GENERATOR  Module  Documentation 


NAME  : 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST : 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

ACTRSV(ACTPTR,  TRGPTR) 

ACTLST  *ACTPTR; 

TRGLST  *TRGPTR; 

INPUTS: 

ACTPTR  -  ACTION  LIST  FROM  WHICH  TO  LOOK  FOR  PATHS. 

TRGPTR  -  TRIGGER  ASSOCIATED  WITH  THIS  ACTION. 

DESCRIPTION 

RESOLVES  ALL  QUALIFIED  NAMES  INTO  FIELD  POINTERS  FOR  ALL 

NAMES 

WHICH  ARE  ROOTED  IN  ACTLST  (ACTION  LIST) . 

ARGUMENTS : 


ACTPTR  =  ACTLST  * 

TRGPTR  =  TRGLST  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 

RW  -  REPORT  WRITER  DEFINITIONS 


ACTRSV 

ACTION  RESOLVE 
C 

FUNCTION 
INT  (  ) 

RWSP 

.  C 

UI 

RW 

RW/AP 


ROUTINES  CALLED; 


GE  rPTH 

ERROR 

SELRSV 

INSRSV 

UQPTH 


GET  PATH 

ISSUE  ERROR  MESSAGE 
SELECT  RESOLVE 
INSERT  RESOLVE 
UNIVERSAL  QUALIFIER  PATH 
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CALLFD  DIRECTLY  BY: 


TRGRSV  -  TRIGGER  RESOLVE 

i;s  I.  D  I N  MA I N  PROGRAM  ( S )  : 

>3RP,  MAl.^  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME  : 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


ADDCHK 

ADD  POSITION  TO  CHECK  LIST 
C 

SUBROUTINE 
VOID  0 
FLANSP 

.  C 

UI 

EE 

FDFE/FLAN 


DESCRIPTION: 


SY.NOPSIS 

VOID  ADDCHK (POSPTR) 

POS  * POSPTR ; 

DESCRIPTION 

ADDS  THE  SPECIFIED  POSITION  TO  THE  OVERLAP  CHECK  LIST 


ARGUMENTS : 


POSPTR  =  POS  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

RVI 

FPCODE 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 


ROUTINES  CALLED: 


FLDTVP  -  FIELD  TYPE 

ERROR  -  ISSUE  ERROR  MESSAGE 


CALLED  DIRECTLY  BY: 

CNKFRM  -  CHECK  FORM 


USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PPOGP-AM 


3-72 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME  ; 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DES.CRIPTION: 


ASSIGN 

ASSIGN  FILE  SECTION 
C 

SUBROUTINE 
VOID  {) 

NDMLGEN 

•  C 

UI 

RW 

RW/AP 


ARGUMENTS : 


SPTR  =  SELECT  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPB 

FPPARM 

FPCODE 

Rv: 

MTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


P.uUIINES  CALLED: 


t PPINTF 

INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 


CALLED  DIRECTLY  BY: 


DATAGEN  -  DATA  DIVISION  GENERATE 
i  ■  L  L  D  1  r J  HA I N  PROGRAM ( S )  : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME  : 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

RLDSUB  (DP) 

FIELD  *DP; 

INPUTS/OUTPUTS 
NONE 

INPUTS: 

(DP)  -  FIELD  POINTER 

OUTPUTS : 

NONE 

DESCRIPTION 

THIS  ROUTINE  TRAVERSES  THE  FORMS  HIERARCHY  LOOKING  FOR 

FORMS 

WHICH  HAVE  A  SELECT  WHICH  TARGETS  TO  ITEMS  ON  THE  FORM  OR 

ONE 

OF  ITS  SUBFORMS.  WHEN  IT  FINDS  ONE  IT  CALLS  BSCODE  WHICH 
GENERATES  A  FORM  PROCEDURE. 

ARGUMENTS : 


BLDSUB 

BUILD  SUBROUTINES 
C 

FUNCTION 
INT  (  ) 

GRP 

.  C 

UI 

RW 

RW/AP 


DP  =  FIELD  * 


INCLUDE  FILES: 


STDTVP 
STD  10 
FPD 

FPDINI 

FPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 
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ROUTINES  CALLED: 


HASDATA  -  DETERMINE  IF  THERE  ARE  ANY  SELECT  STATEMENTS 
BSCODE  -  BUILD  SUBROUTINE  CODE 

BLDSUB  -  BUILD  SUBROUTINES 


CALLED  DIRECTLY  BY: 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 

BLDSUB  -  BUILD  SUBROUTINES 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME  : 

PURPOSE : 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

BSCODE ( DP) 

FIELD  *DP; 

INPUTS/OUTPUTS : 
NONE 


BSCODE 

BUILD  SUBROUTINE  CODE 
C 

FUNCTION 
INT  ( ) 

GRP 

.  C 

UI 

RW 

RW/AP 


INPUTS  : 

(DP)  -  FIELD  POINTER 


OUTPUTS : 

NONE 

DESCRIPTION 

THE  FIELD  POINTER  WHICH  IS  PASSED  TO  THIS  ROUTINE  IS 

POINTING 

TO  A  FIELD  WHOSE  CONTENTS  ARE  A  FORM.  THIS  ROUTINE 

GENERATES  THE 

CODE  FOR  A  SUBROUTINE  THAT  CORRESPONDS  TO  THE  NAME  OF  THAT 

FORM. 

THIS  PROCEDURE  IMPLEMENTS  THE  "INSTANTIATION  RULES".  THE 

FORM 

FROCEDURES  ARE  OF  THE  FORM: 

FORMNAME ( FORMPTR ,  FORMPATH ) 

STRUCT  FRM%D  *FORMPTR;  POINTER  TO  DATA 

STRUC^UPF  OF  FORM. 

CHAR  *F'^RMPArH;  PATH  IN  FORM  PROCESSOR 

TO  FORM. 


DFCIT^RE  SOME  VARIABLES 


FORM"  . 

ITEMS  ON  FORM. 


"VISIT  ALL  ITEMS  ON 
COPY  DATA  VALUES  TO 
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MEMCPY (FORMPTR->FIELD,  DBR%D. FIELD,  SIZE); 


FORM" . 


"VISIT  ALL  ARRAYS  ON 


FOR  (I  =  0;  IDONE;  I++) 

{ 

<CHECK  FOR  GROUP  SEPERATOR  OR  END  OF  FILE 
DATA  RECORDS  WHICH  TARGET  TO  THESE  SUBFORMS . > 


<CHECK  FOR  OVERFLOW  ON  THIS  ARRAY . > 

<CALL  THE  SUBFORM'S  PROCEDURE. > 

} 


<READ  NEXT  DATA  RECORD  AND  CHECK  FOR  CHANGE 
CONDITIONS. > 


RETURN  <TRUE  IF  ANY  CONDITIONS  TRIPPED  OR  READ  END 
OF  FILE.> 


ARGUMENTS : 


DP  =  FIELD  * 


irJCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

MTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 


P'^'IIN'ES  CALLED: 


SPRINTF 


P.FADDB 
l-SLTNDP 
MAPDB 
■.TSITA 
hi  AS  ITEM 


:;ft:;dp 


GENERATE  A  LINE  OF  CODE 
READ  DATA  BASE 

RESET  NODUPLICATE  FIELDS  TO  VALUE  OF  NODUP'sD 
MAP  DATABASE 

VISIT  ARRAYS  ON  THIS  FORM 

THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN  ITEM 
WITHIN 

SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY  ARE 
DUPLICATED 


AilEi}  i)IRLCTLV  BY: 


:;i  LSUB  -  BUILD  SUBROUTINES 
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GRP/MAIN 
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-  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME  : 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


ARGUMENTS : 


FP  =  FIELD  * 

DP  =  FIELD  * 


INCLUDE  FILES: 


STDTYP 

FPD 

FPCODE 

RW 


ROUTINES  CALLED: 


CALCSTAT 
MAKQR 
S PRINT F 
GLN 


CALCSTAT 

CALCULATE  STATISTIC 
C 

SUBROUTINE 
VOID  0 
RWSP 

.C 

UI 

RW 

RW/AP 


-  STANDARD  TYPE  DEFINITIONS 

-  FORM  PROCESSOR  DATA 

-  FORM  PROCESSOR  RETURN  CODES 

-  REPORT  WRITER  DEFINITIONS 


-  CALCULATE  STATISTIC 

-  MAKE  QUALIFIED  REFERENCE 

-  GENERATE  A  LINE  OF  CODE 


CAIPFD  DIRECTLY  BY: 


i-P:MPDAT  -  FORM  PDATA 

JALCSTAT  -  CALCULATE  STATISTIC 


:;.;fd  in  main  program (S)  : 

ORP  MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


CCONV 

C  CONVERSIONS 
C 

SUBROUTINE 
VOID  0 
MAKES 

.  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


ES  =  ESDTYPE  * 

TbLSTR  =  CHAR  * 

SELNO  =  INT 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 


STDTYP 

STDIO 

FPU 

RW 


ROUTINES  CALLED: 


ATOl 

FSCPY 

STRNCMP 

FPRINTF 

MAKES/ INDENT  -  INDENT 


CALLED  DIRECTLY  BY: 


HAKES  -  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 


USED  IN  MAIN  PROGRAM(S): 


GRP/MATN 


GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME  : 

PURPOSE : 

LANGUAGE: 

MODULE  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


CDMESQY 

PROGRAM  NAME  CDMESQY 
VAX- 11  COBOL 
SUBROUTINE 
CDMESQY 
.  PRC 

UI 

RV^ 

RW/AP 


SELECTS  ALL  THE  DATA  ITEMS  FOR  A  GIVEN  VIEW  AND  RETRIEVES 
EACH  ES  DATA  ITEM'S  MACHINE  TYPE,  SIZE,  AND  NUMBER  OF  DECIMAL 
DIGITS . 

THIS  INFORMATION  IS  RETURNED  TO  THE  CALLING  PROGRAM  IN  AN 
ARRAY  STRUCTURE. 

THIS  ROUTINE  WILL  CHANGE  WHEN  DOMAINS  AND  DATA  TYPES  ARE 
COMPLETELY  DEFINED  FOR  THE  CDM. 


ARGUMENTS : 

VIEW  =  DSPLY  [X(30)  ] 

ItJCIUDE  FILES: 

3RVRET  -  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

ERRPRO  -  PROCESS  ERROR  INCLUDE  FILE 

ROUTINES  CALLED: 

ERRPRO 


JALLEO  DIRECTLY  BY: 

MAKES  -  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

" T  !-  [)  I  r;  MA  I  N'  PROGRAM  (  S  )  : 

..HP  MAit;  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME : 

PURPOSE: 

LANCvJAliE  : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


CES 
C  ES 
C 

SUBROUTINE 
VOID  0 
MAKES 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


ESDTYPE  * 
INT 
I  NT 
INT 


ES  = 

SELNO  = 
TBLNUM  = 
REC  CNT  = 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


FPRINTF 

ATOI 

ESCPY 

MAKES/INDENT  -  INDENT 


CALLED  DIRECTLY  BY: 


MAKES  -  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 


USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME  : 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


CESPS 

C  ES  TO  PS 
C 

SUBROUTINE 
VOID  0 
ESPSMAP 


UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


SELPTR  =  SELECT  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


CALLED  DIRECTLY  BY: 


ESPSMAP  -  THE  EXTERNAL  SCHEMA  AND  PRESENTATION  SCHEMA 

MAPPING 


USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-83 


PS  620344 
30  September  1 


APPLICATION  GENERATOR  Module  Documentation 


NAME : 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


CHKARY 
CHECK  ARRAY 
C 

FUNCTION 
CHAR  *  ( ) 
FLANSP 

.C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

VOID  CHKARY (ARYPTR) 

FIELD  *ARYPTR; 

DESCRIPTION 

GENERATES  POSITIONS  FOR  EACH  ELEMENT  OF  AN  ARRAY  FOR 

OVERLAP  CHECKING 

ARGUMENTS : 


ARYPTR  =  FIELD  * 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 


STDTYP 

STDIO 

FPD 

RW 

FPCODE 


ROUTINES  CALLED: 


MYALLOC  -  MY  MALLOC 

ABS 

STRASN 


CALLED  DIRECTLY  BY: 


CUIKFRM  -  CHECK  FORM 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


CHKFLD 
CHECK  FIELD 
C 

FUNCTION 
CHAR  *  0 
FLANSP 

•  C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

VOID  CHKFLD () 

DESCRIPTION 

CHECKS  THE  CURRENT  FIELD  FOR  COMPLETENESS  AND  CONSISTENCY 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

RW 

FPCODE 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 


ROUTINES  CALLED: 


FNDATT 

ERROR 

MEMSET 

MAX 

FREE 

WRTEXP 

BLEN 

MEMCPY 

SYSMSG 

MYALLOC 

STRLEN 


FIND  ATTRIBUTE 
ISSUE  ERROR  MESSAGE 


WRITE  EXPRESSION 


MY  MALLOC 


CALLED  DIRECTLY  BY: 


YY PARSE  -  FLAN  PARSER 

USED  IN  MAIN  PROGRAM (S) : 

GxRF/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


CHKFRM 
CHECK  FORM 
C 

FUNCTION 
CHAR  *  ( ) 
FLANSP 

.C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

VOID  CHKFRM 0 


DESCRIPTION 

CHECKS  THE  CURRENT  FORM  FOR  COMPLETENESS  AND  CONSISTENCY 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 


ROUTINES  CALLED: 


V-JARNING 

ADDCHK 

CHKARY 

ABS 

STRLEN 

FREE 

FLDTYP 

ERROR 

GFLDPT 

ABS 

MAX 

STRASN 

FNDATT 


ISSUE  WARNING  MESSAGE 
ADD  POSITION  TO  CHECK  LIST 
CHECK  ARRAY 


FIELD  TYPE 

ISSUE  ERROR  MESSAGE 

GET  FIELD  POINTER 


FIND  ATTRIBUTE 


CALLED  DIRECTLY  BY: 


YYPARSF  -  FLAN  PARSER 
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USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 
CHKGRP(FP) 

FIELD  *FP; 

INPUTS/OUTPUTS 
NONE 

INPUTS: 

FP  -  FIELD  POINTER 

•  OUTPUTS: 

NONE 

DESCRIPTION 

CHECKS  IF  THE  DATA  RECORD  WHICH  TARGETS  TO  THE  FORM  (FP) 

HAS  A 

GROUP  SEPERATOR  OR  END  OF  FILE.  IF  SO  IT  CLEARS  THE 

NODUP%D  FIELDS 
AND  READS  ANOTHER  RECORD. 

ARGUMENTS : 


CHKGRP 

CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 
C 

FUNCTION 
INT  0 
GRP 

.  C 

UI 

RW 

RW/AP 


FP  =  FIELD  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 
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ROUTINES  CALLED: 


HAS LOWER  -  HAS  A  LOWER  FORM  WHICH  READS  THE  SAME  DATA 

RECORD? 


SPRINTF 

GEN 

CLRNDP 

DBFREAD 


GENERATE  A  LINE  OF  CODE 
CLEAR  NODUPLICATE  FIELDS 
GENERATE  DATA  BASE  FREAD 


CALLED  DIRECTLY  BY: 

VISITA  -  VISIT  ARRAYS  ON  THIS  FORM 

USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE; 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


CHKSIZE 

CHECK  SIZE  OF  ITEMS 
C 

SUBROUTINE 
VOID  0 
CHKSIZE 

.C 

UI 

RW 

RW/AP 


DOING  CONVERSIONS  ON 


SYNOPSIS 

CHKSIZE (DPTR,  FPTR,  DIR) 
CDMDTYPE  *DPTR; 

FIELD  *FPTR; 

CHAR  DIR; 


DESCRIPTION 

CHECK  THE  SIZE  OF  THE  CDM  DATA  TYPE  TO  THE  PRESENTATION 
ITEM  SIZE 

ONLY  PUT  OUT  A  WARNING  MESSAGE  IF  TRUNCATION  WILL  OCCUR 
ON  CONVERSION 


ARGUMENTS: 


DPTR  = 
FPTR  = 
DIR  = 


CDMDTYPE  * 
FIELD  * 
CHAR 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


BLEN 

FPRINTF 


CALLED  DIRECTLY  BY: 


COBESPS  -  COBOL  ES  TO  PS 

COBPE  -  COBOL  PE 
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USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 
CLRNDP(SP) 

SELECT  *SP; 

INPUTS/OUTPUTS: 

NONE 

INPUTS: 

SP  -  SELECT  POINTER 

OUTPUTS : 

NONE 

DESCRIPTION 

CLEARS  ALL  THE  NODUP%D  FIELDS  WHICH  THIS  SELECT  AND  ALL 

ITS  CHILDREN 

TARGET  TO. 

ARGUMENTS : 


CLRNDP 

CLEAR  NODUPLICATE  FIELDS 
C 

FUNCTION 
INT  0 
GRP 

.C 

UI 

RW 

RW/AP 


SP  =  SELECT  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 
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ROUTINES  CALLED: 


SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 

CLRNDP  -  CLEAR  NODUPLICATE  FIELDS 


CALLED  DIRECTLY  BY: 


GENAQ  -  GENERATE  ACTION  QUERY  (SELECT) 

CHKGRP  -  CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 

CLRNDP  -  CLEAR  NODUPLICATE  FIELDS 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST : 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


CLSFIL 
CLOSE  FILES 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

•  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


SPTR  SELECT  * 


INCLUDE  FILES; 


STDTYP 

-  STANDARD  TYPE 

DEFINITIONS 

STDIO 

-  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD 

-  FORM  PROCESSOR 

DATA 

FPPARM 

-  FORM  PROCESSOR 

PARAMETERS 

FPCODE 

-  FORM  PROCESSOR 

RETURN  CODES 

RW 

-  REPORT  WRITER 

DEFINITIONS 

NTM 

-  NTM  INTERFACE 

INCLUDE  FILE 

CTLCHR 

-  CONTROL  CHARACTERS 

ROTTTINES  CALLED: 


CLSFIL  -  CLOSE  FILES 

FPRINTF 

INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 


CALLED  DIRECTLY  BY: 


CLSFIL  -  CLOSE  FILES 

PROCGEN  -  PROCEDURE  DIVISION  GENERATE 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE. 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


COBCONV 

COBOL  CONVERSIONS 
C 

SUBROUTINE 
VOID  0 
MAKES 

.C 

UI 

RW 

RW/AP 


ARGUMENTS : 


ES  = 

TBLSTR  = 
SELNO  = 
REC  CNT  = 


ESDTYPE  * 
CHAR  * 
INT 
INT 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


MAKES/NUMPIC  -  NUMBER  PICTURE  CLAUSE 

MAKES/CNUMPIC  -  C  NUMBERS 

ATOI 

DASH  -  WRITE  DASH 

ESCPY 

FPRINTF 

MAKES/INDENT  -  INDENT 


CALLED  DIRECTLY  BY: 

MAKES  -  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME  : 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


COBES 

COBOL  ES  RECORD 
C 

SUBROUTINE 
VOID  0 
MAKES 

•  C 


SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 


DESCRIPTION: 


ARGUMENTS : 


ESDTYPE  * 
I  NT 
I  NT 
INT 


sLno  = 

TBLNUM  = 
REC  CNT  = 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


MAKES/NUMPIC  -  NUMBER  PICTURE  CLAUSE 
FPRINTF 

MAKES/INDENT  -  INDENT 
ATOI 

DASH  -  WRITE  DASH 

ESCPY 


CALLED  DIRECTLY  BY: 


MAKES  -  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 


USED  IN  MAIN  PROGPJ^(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME:  COBESPS 

PURPOSE:  COBOL  ES  TO  PS 

LANGUAGE :  C 

MODULE  TYPE:  SUBROUTINE 

FUNCTION  TYPE:  VOID  () 

SOURCE  FILE:  ESPSMAP 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 

DESCRIPTION: 


ARGUMENTS : 


SELPTR  =  SELECT  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


DASH  -  WRITE  DASH 

GETTBL  -  GET  A  TABLE  NAME 

GETCOL  -  GET  THE  COLUMN  NAME  OF  A  TABLE. COLUMN  OR  COLUMN 

STRING 

CHKSIZE  -  CHECK  SIZE  OF  ITEMS  DOING  CONVERSIONS  ON 
FPRINTF 

ESPSMAP/ INDENT  -  INDENT 


CALLED  DIRECTLY  BY: 


ESPSMAP  -  THE  EXTERNAL  SCHEMA  AND  PRESENTATION  SCHEMA 

MAPPING 


USED  IN  MAIN  PROGRAM (S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


COBPE 
COBOL  PE 
C 

SUBROUTINE 
VOID  0 
REMAP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


STRl  - 
STR2  = 
FPTR  = 
DPTR  = 


CHAR  * 

CHAR  * 
FIELD  * 
CDMDTYPE  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


FPRINTF 

CHKSIZE  -  CHECK  SIZE  OF  ITEMS  DOING  CONVERSIONS  ON 

INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 


CALLED  DIRECTLY  BY: 


REMAP  -  THE  PRESENTATION  SCHEMA  AND  THE  EXTERNAL  SCHEMA 

AND  MAPPING 


USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


CPE 
C  PE 
C 

SUBROUTINE 
VOID  0 
REMAP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


STRl  = 
STR2  = 
FPTR  = 
DPTR  = 


CHAR  * 

CHAR  * 
FIELD  * 
CDMDTYPE  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 


CALLED  DIRECTLY  BY: 

PEMAP  -  THE  PRESENTATION  SCHEMA  AND  THE  EXTERNAL  SCHEMA 

AND  MAPPING 

USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE ; 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


CSTASH 

CHARACTER  STASH 
C 

FUNCTION 
CHAR  *  0 
FLANSP 

.C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

CHAR  * CSTASH (S) 
CHAR  *S; 


DESCRIPTION 

SAVES  THE  SPECIFIED  CHARACTER  STRING  AND  RETURNS  A 

POINTER  TO  IT 


ARGUMENTS : 


S  =  CHAR  * 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 


STDTYP 

STDIO 

FPD 

RW 

FPCODE 


ROUTINES  CALLED: 


STRCPY 

STRLEN 

MYALLOC  -  MY  MALLOC 


CALLED  DIRECTLY  BY: 


YYLEX  -  LEXICAL  ANALYZER  FOR  FLAN 

YYPARSE  -  FLAN  PARSER 


USED  IN  MAIN  PROGRAM{S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

CTLRSV(CTLPTR) 

CTLLST  *CTLPTR; 

INPUTS: 

CTLPTR  -  CONTROL  LIST  FROM  WHICH  TO  LOOK  FOR  PATHS. 
DESCRIPTION 

RESOLVES  ALL  QUALIFIED  NAMES  INTO  FIELD  POINTERS  FOR  ALL 

NAMES 

WHICH  ARE  ROOTED  IN  CTLLST 'S  (CONTROL  LISTS) . 

ARGUMENTS : 


CTLPTR  =  CTLLST  * 


CTLRSV 

CONTROL  RESOLVE 
C 

FUNCTION 
INT  0 
RWSP 

•  C 

UI 

RW 

RW/AP 


INCLUDE  FILES: 


STDTYP 

FPD 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  RETURN  CODES 
REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


GETPTH  -  GET  PATH 

ERROR  -  ISSUE  ERROR  MESSAGE 


CALLED  DIRECTLY  BY: 


FLDRSV  -  FIELD  RESOLVE 
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USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


DASH 

WRITE  DASH 
C 

SUBROUTINE 
VOID  0 
MAKES 

.C 

UI 

RW 

RW/AP 


t  _  I 


DESCRIPTION: 


ARGUMENTS : 

STR  =  CHAR  [ ] 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


STRCHR 


CALLED  DIRECTLY  BY: 


COBESPS  -  COBOL  ES  TO  PS 

COBES  -  COBOL  ES  RECORD 

COBCONV  -  COBOL  CONVERSIONS 

MAKES  -  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

MAKWHES/COBWHES  -  COBOL  WHERE  ES 

SELGEN  -  SELECT  GENERATE 

SELWS  -  SELECT  WORKING  STORAGE  SECTION 

INSWS  -  INSERT  WORKING  STORAGE  SECTION 

INSERT  -  INSERT  PROCEDURE 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


DATAGEN 

DATA  DIVISION  GENERATE 
C 

FUNCTION 
INT  0 
NDMLGEN 

.C 

UI 

RW 

RW/AP 


ARGUMENTS : 


LANG  =  INT 

APNAME  =  CHAR  * 

TYPE  =  CHAR 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

NTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


NDMLLNK 

FILELNK 

INDENT 

FPRINTF 

SELWS 

INSWS 

FD 

ASSIGN 


LINKAGE  SECTION 

FILE  LINKAGE  SECTION  GENERATE 

INDENT  A  LINE  OF  GENERATED  CODE 

SELECT  WORKING  STORAGE  SECTION 
INSERT  WORKING  STORAGE  SECTION 
FD  SECTION  DECLARATIONS 
ASSIGN  FILE  SECTION 


CALLED  DIRECTLY  BY: 


STUCODE  -  STANDARD  COBOL  CODE 
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USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


DBFREAD 

GENERATE  DATA  BASE  FREAD 
C 

FUNCTION 
INT  0 
GRP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

DBFREAD(SP,  GENCHG) 
SELECT  *SP; 

BOOL  GENCHG; 


INPUTS/OUTPUTS : 
NONE 


INPUTS : 

SP  -  SELECT  POINTER  INDICATES  DATA  RECORD  TO  READ. 

GENCHG  -  IF  TRUE  THEN  ALSO  GENERATE  THE  CHECK  CHANGE 

CONDITION  CODE. 

OUTPUTS: 

NONE 

DESCRIPTION 

GENERATES  THE  FREAD  TO  READ  THE  DATA  RECORD  ASSOCIATED 

WITH  A  SELECT. 

SETS  THE  DECODE  TO  INDICATE  STATUS  (TRUE  INDICATES  AN  EOF 

OR  GROUP 

SEPERATOR  WAS  READ) .  IF  GENCHG  IS  TRUE  THEN  ALSO  GENERATE 

THE  CODE 

TO  CHECK  CHANGE  CONDITIONS. 

ARGUMENTS : 


SP  =  SELECT  * 

GENCHG  =  BOOL 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 
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FPPARM  -  FORM  PROCESSOR  PARAMETERS 

RW  -  REPORT  WRITER  DEFINITIONS 

NTM  -  NTM  INTERFACE  INCLUDE  FILE 


ROUTINES  CALLED: 


SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 


CALLED  DIRECTLY  BY: 


SELOPN  -  SELECT  OPEN 

READDB  -  READ  DATA  BASE 

CHKGRP  -  CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-107 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

DCLINDX(TP) 

TRGLST  *TP; 

INPUTS: 

TP  -  CONDITION  WHICH  REQUIRES  INDEX  VARIABLES. 
DESCRIPTION 

THIS  PROCEDURE  DECLARES  THE  INDEX  VARIABLES  USED  IN 

CONDITIONS  AND 

ACTIONS  WHICH  MAKE  USE  OF  UNIVERSAL  QUALIFICATION.  THESE 

DECLARATIONS 

FOR  CONDITIONS  AND  ACTIONS  RESPECTIVELY  ARE: 

INT  TINDX%D, . . . ; 

INT  AINDX%D, . . . ; 

ARGUMENTS : 


DCLINDX 

DECLARE  INDEX  VARIABLES 
C 

FUNCTION 
INT  0 
GENACT 

•  C 

UI 

RW 

RW/AP 


TP  =  TRGLST  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


MAX 

STRCPY 

SPRINTF 

STRLEN 

STRCAT 

GEN  -  GENERATE  A  LINE  OF  CODE 
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CALLED  DIRECTLY  BY: 


GENTRG  -  GENERATE  TRIGGERS 

GENDOA  -  GENERATE  PROCEDURE  "DOACT"  DO  ACTION 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME; 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


ENDGEN 

END  GERNERATE 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


GENERATE  THE  ENDING  CODE  WHICH  CLOSES  THE  FILES  AND  DOES  TH^ 
NDML  ERROR  PROCESSING 

ARGUMENTS : 


LANG  =  INT 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

NTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAulETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


FPRINTF 

INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 


CALLED  DIRECTLY  BY: 


STDCODE  -  STANDARD  COBOL  CODE 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME :  ERROR 

PURPOSE:  ISSUE  ERROR  MESSAGE 

LANGUAGE:  C 

MODULE  TYPE:  SUBROUTINE 

FUNCTION  TYPE:  VOID  () 

SOURCE  FILE:  FLUIERR 

SOURCE  PILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  FE 

DOCUMENTATION  GROUP:  FDFE/FLAN 

DESCRIPTION: 


SYNOPSIS 

VOID  ERROR(S,  A,  B,  C,  D,  E,  F) 

CHAR  *S,  *A,  *B,  *C,  *D,  *E,  *F; 

DESCRIPTION 

PRINTS  AN  ERROR  MESSAGE  ON  STDERR  AND  INCREMENTS  THE 

NUMBER  OF  ERRORS 

ARGUMENTS: 


S  -  CHAR  * 
A  =  CHAR  * 
B  =  CHAR  * 
C  =  CHAR  * 
D  =  CHAR  * 
E  =  CHAR  * 
F  =  CHAR  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 


ROUTINES  CALLED: 


PMSGLS 

STRLEN 

SPRINTF 


CALLED  DIRECTLY  BY: 


GENTRG  -  GENERATE  TRIGGERS 

CHKFLD  -  CHECK  FIELD 

CHKFRM  -  CHECK  FORM 

ADDCHK  -  ADD  POSITION  TO  CHECK  LIST 

YYLEX  -  LEXICAL  ANALYZER  FOR  FLAN 

YYPARSE  -  FLAN  PARSER 
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MKINC 

GETFILE 

MAKES 

INSRSV 

SELRSV 

CTLRSV 

STATRSV 

TRGRSV 

ACTRSV 

MLPFRM 


USED  IN  MAIN 


GRP/MAIN 


-  MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 

MAKING) 

-  RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM  THE 

USER 

-  MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

-  INSERT  RESOLVE 

-  SELECT  RESOLVE 

-  CONTROL  RESOLVE 

-  STATISTIC  RESOLVE 

-  TRIGGER  RESOLVE 

-  ACTION  RESOLVE 

-  MAKE  A  LIST  OF  PRESENTED  FORMS 


PROGRAM (S) : 

-  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


ESPSMAP 

THE  EXTERNAL  SCHEMA  AND  PRESENTATION 
SCHEMA  MAPPING 
C 

SUBROUTINE 
VOID  0 
ESPSMAP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

ESPSMAP  (LANG,  SELPTR) 
I NT  LANG; 

SELECT  *SELPTR; 


DESCRIPTION 

GENERATES  THE  CODE  TO  TRANSFORM  AN  EXTERNAL  SCHEMA  DATA 

ITEM  INTO 

A  PRESENTATION  SCHEMA  FORM  ITEMS  AND  VICE  VERSA. 
ARGUMENTS: 


LANG  =  INT 

SELPTR  =  SELECT  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


CESPS  -  C  ES  TO  PS 

COBESPS  -  COBOL  ES  TO  PS 


CALLED  DIRECTLY  BY: 


SELMAP  -  MAP  SELECTED  DATA  TO  OUTPUT  RECORD 
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-  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


ESPSMAP/ INDENT 

INDENT 

C 

SUBROUTINE 
VOID  0 
ESPSMAP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


M  =  INT 

T  =  INT 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


PUTC 


CALLED  DIRECTLY  BY: 

COBESPS  -  COBOL  ES  TO  PS 

USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

VOID  FATAL(S,  A,  B,  C,  D,  E,  F) 

CHAR  *S,  *A,  *B,  *C,  *D,  *E,  *F; 

DESCRIPTION 

PRINTS  A  FATAL  MESSAGE  ON  STDERR  AND  EXITS 
ARGUMENTS: 


S  =  CHAR  * 
A  =  CHAR  * 
B  =  CHAR  * 
C  =  CHAR  * 
D  =  CHAR  * 
E  =  CHAR  * 
F  =  CHAR  * 


FATAL 

ISSUE  FATAL  ERROR  MESSAGE 
C 

SUBROUTINE 
VOID  0 
FLU I ERR 

.C 

UI 

FE 

FDFE/FLAN 


INCLUDE  FILES- 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 


ROUTINES  CALLED: 


SPRINTF 

STRLEN 

PMSGLS 


CALLED  DIRECTLY  BY: 


MYALLOC 

YYLEX 

YYPARSE 


MY  MALLOC 

LEXICAL  ANALYZER  FOR  FLAN 
FLAN  PARSER 
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USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


ARGUMENTS : 


FD 

FD  SECTION  DECLARATIONS 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

.C 

UI 

RW 

RW/AP 


SPTR  =  SELECT  * 


INCLUDE  FILES: 


STDTYP 

-  STANDARD  TYPE 

DEFINITIONS 

STDIO 

-  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD 

-  FORM  PROCESSOR 

DATA 

FPPARM 

-  FORM  PROCESSOR 

PARAMETERS 

FPCODE 

-  FORM  PROCESSOR 

RETURN  CODES 

RW 

-  REPORT  WRITER 

DEFINITIONS 

NTM 

-  NTM  INTERFACE 

INCLUDE  FILE 

CTLCHR 

-  CONTROL  CHARACTERS 

ROUTINES  CALLED: 


SELLEN  -  COMPUTE  LENGTH  OF  SELECT  PS  RECORD 

FPRINTF 

INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 


CALLED  DIRECTLY  BY: 


DATAGEN  -  DATA  DIVISION  GENERATE 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-118 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


FILELNK 

FILE  LINKAGE  SECTION  GENERATE 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


SPTR  ==  SELECT  * 


INCLUDE  FILES: 


STDTYP 

-  STANDARD  TYPE 

DEFINITIONS 

STDIO 

-  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD 

-  FORM  PROCESSOR 

DATA 

FPPARM 

-  FORM  PROCESSOR 

PARAMETERS 

FPCODE 

-  FORM  PROCESSOR 

RETURN  CODES 

RW 

-  REPORT  WRITER 

DEFINITIONS 

NTM 

-  NTM  INTERFACE 

INCLUDE  FILE 

CTLCHR 

-  CONTROL  CHARACTERS 

ROUTINES  CALLED: 


INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 

FPRINTF 


CALLED  DIRECTLY  BY: 

DATAGEN  -  DATA  DIVISION  GENERATE 

USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


FLANCI 

FLAN  CALLABLE  INTERFACE 
C 

FUNCTION 
CHAR  *  ( ) 

FLANSP 

•  C 

UI 

FE 

FDFE/FLAN 


SYNOPSIS 

CHAR  *FLANCI (FPTR) 

FILE  *FPTR; 

INPUTS : 

FPTR  -  FILE  TO  BE  COMPILED 
DESCRIPTION 

COMPILES  THE  SPECIFIED  FILE  INTO  THE  LOCAL  OPEN  LIST. 
ARGUMENTS: 


FPTR  =  FILE  * 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 


STDTYP 

STDIO 

FPD 

RW 

FPCODE 


ROUTINES  CALLED: 


YYPARSE  -  FLAN  PARSER 
DELFLD 


CALLED  DIRECTLY  BY: 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME :  FLDRSV 

PURPOSE:  FIELD  RESOLVE 

LANGUAGE :  C 

MODULE  TYPE:  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE:  RWSP 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 

DESCRIPTION: 


SYNOPSIS 
FLDRSV (DP) 

FIELD  *DP; 

INPUTS : 

DP  -  FIELD  FROM  WHICH  TO  BEGIN  SEARCH. 

DESCRIPTION 

RESOLVES  ALL  QUALIFIED  NAMES  INTO  FIELD  POINTERS  FOR  ALL 

NAMES 

WHICH  ARE  ROOTED  IN  FIELDS. 

ARGUMENTS: 


DP  =  FIELD  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


FLDRSV  -  FIELD  RESOLVE 

CTLRSV  -  CONTROL  RESOLVE 

STATRSV  -  STATISTIC  RESOLVE 


CALLED  DIRECTLY  BY: 


RWOPN  -  REPORT  WRITER  OPEN  FORMS 

FLDRSV  -  FIELD  RESOLVE 
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USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN 
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-  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


FLDTYP 
FIELD  TYPE 
C 

FUNCTION 
CHAR  *  ( ) 
FLANSP 

.C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

CHAR  *FLDTYP(C) 
CHAR  C; 


DESCRIPTION 

RETURNS  A  STRING  OF  THE  SPECIFIED  FIELD  TYPE 


ARGUMENTS : 


C  =  CHAR 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 


STDTYP 

STDIO 

FPD 

RW 

FPCODE 


CALLED  DIRECTLY  BY: 


CHKFRM  -  CHECK  FORM 

ADDCHK  -  ADD  POSITION  TO  CHECK  LIST 


USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-123 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


FNDATT 

FIND  ATTRIBUTE 
C 

FUNCTION 
ATTMAP  *  ( ) 
FLANSP 

.C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

ATTMAP  *FNDATT(S) 

CHAR  *S; 

DESCRIPTION 

RETURNS  A  POINTER  TO  THE  SPECIFIED  ATTRIBUTE  IN  THE 

ATTRIBUTE  MAP 


ARGUMENTS: 


S  =  CHAR  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

RW 

FPCODE 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 


ROUTINES  CALLED: 


STRCMP 


CALLED  DIRECTLY  BY: 


CHKFLD 
CHKFRM 
YY PARSE 
RWEXPD 
RWSP/FIXFR 


CHECK  FIELD 
CHECK  FORM 
FLAN  PARSER 

REPORT  WRITER  EXPAND  ARRAYS 
FIX  UP  A  FORM 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


FNDFRM 
FIND  FORM 
C 

FUNCTION 
FIELD  *  0 
RWSP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

FIELD  *FNDFRM(STR) 

CHAR  STR[ ] ; 

INPUTS : 

STR  -  NAME  OF  FORM  TO  FIND 


DESCRIPTION 


FINDS  THE  NAMED  FORM  ON  THE  OPNLST  AND  RETURNS 

TO  IT. 

RETURNS  A  NULL  IF  THE  FORM  CAN  NOT  BE  FOUND. 
ARGUMENTS: 


STR  =  CHAR  [  ] 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


STRCMP 


CALLED  DIRECTLY  BY: 


GENMAIN 

GENAR 

MLPFRM 

WINRSV 


GENERATE  MAIN  PROGRAM 
GENERATE  ACTION  PRESENT 
MAKE  A  LIST  OF  PRESENTED  FORMS 
WINDOW  RESOLVE 


POINTER 
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GRP/MAIN 


-  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME; 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

FRMPDAT(FDP) 

FIELD  *FDP; 

INPUTS : 

FDP  -  POINTER  TO  A  FORM. 

DESCRIPTION 

GENERATES  A  PDATA  FOR  THE  FORM  POINTED  TO  BY  FDP  IF  THERE 

ARE  ANY 

ITEMS  ON  IT. 

ARGUMENTS: 


FDP  =  FIELD  * 


FRMPDAT 
FORM  PDATA 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


HASITEM 

CALCSTAT 

SPRINTF 

GEN 

RSETSTAT 


THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN  ITEM 
WITHIN 

CALCULATE  STATISTIC 

GENERATE  A  LINE  OF  CODE 
RESET  STATISTIC 


CALLED  DIRECTLY  BY : 


GENAP  -  GENERATE  ACTION  PAGE 

GENAR  -  GENERATE  ACTION  PRESENT 


3-127 


PS  620344502 
30  September  1990 


USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


FRNTND 

FORMS  FRONT  END  TO 
C 

FUNCTION 
CHAR  *  ( ) 

APFRNT 

.C 

UI 

AP 

APGEN 


APPLICATION  GENERATOR 


SYNOPSIS 

CHAR  *FRNTND() 


INPUTS/OUTPUTS  : 

NONE 

INPUTS: 

NONE 

OUTPUTS: 

NONE 

DESCRIPTION 

THIS  FUNCTION  PRESENTS  A  TOP  LEVEL  FORM  REQUESTING  A 
FILE  NAME  FROM 

THE  USER.  IT  RETURNS  THAT  FILE  NAME  TO  GRP.  THE  NAME  OF 

THE  FORM  IS 

"APFRONT. FDL"  FOR  THE  APPLICATION  GENERATOR  AND 

"RWFRONT.FDL"  FOR  THE 

REPORT  WRITER  AND  "FLFRONT. FDL"  FOR  FLAN.  IT  IS 

HARDCODED  INTO  THE 

ROUTINE.  THERE  IS  ONE  COPY  OF  THIS  ROUTINE  FOR  THE  AP 

AND  ONE  FOR 

THE  RW  AND  ONE  FOR  FLAN. 

ARGUMENTS : 


FILNAM  =  CHAR  [41] 


INCLUDE  FILES: 


STDTYP 

FPPARM 

NTM 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  PARAMETERS 
NTM  INTERFACE  INCLUDE  FILE 
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ROUTINES  CALLED: 
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STRCHR 

INITAL 

MEMCMP 

TRMNAT 

PMSGLC 

INITFP 

ADDFRM 

GDATA 

OISCR 

SPRINTF 


CALLED  DIRECTLY  BY: 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME :  GEN 

PURPOSE:  GENERATE  A  LINE  OF  CODE 

LANGUAGE :  C 

MODULE  TYPE:  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE:  GRP 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 

DESCRIPTION: 


SYNOPSIS 

GEN  (STRING) 

CHAR  STRING[]; 

INPUTS/OUTPUTS: 

NONE 

INPUTS: 

STRING  -  THIS  IS  THE  LINE  OF  CODE  TO  GENERATE 

OUTPUTS : 

NONE 

DESCRIPTION 

THIS  ROUTINE  WILL  MOVE  A  LINE  OF  CODE  TO  THE  OUTPUT  FILE, 
IT  ALSO  TAKES  CARE  OF  BALANCING  RIGHT  AND  LEFT  BRACKETS 
AS  WELL  AS  ALIGNING  #  TYPE  STATEMENTS. 

ARGUMENTS : 


STRING  =  CHAR  [ ] 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

FPDINI  -  FPD  INITIALIZATION 

FPPARM  -  FORM  PROv:ESSOR  PARAMETERS 

RW  -  REPORT  WRITER  DEFINITIONS 

NTM  -  NTM  INTERFACE  INCLUDE  FILE 


ROUTINES  CALLED: 


FPRINTF 
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CALLED  DIRECTI.Y  BY: 


GENMAIN 

GENTRG 

GENAAL 

GENAA 

GENDOA 

DCLINDX 

GENAL 

UQFOR 

GENAP 

GENAR 

GENAQ 

GENAS 

GENAE 

GENAH 

GENAT 

GENAI 

SELWHR 

SELOPN 

FRMPDAT 

GENBEG 

MKINC 

GENDB 

GENES 

GENDS 

GENFSD 

GENFP 

GENNDP 

GENCHG 

GENINS 

BSCODE 

MAPDB 

VISITA 

CHKGRP 

CLRNDP 

GENPAG 

DBFREAD 

SETNDP 

RSETNDP 

CALCSTAT 

RSETSTAT 


GENERATE  MAIN  PROGRAM 
GENERATE  TRIGGERS 

GENERATE  PROCEDURE  "ADDAL"  ADD  ACTION  LIST 

GENERATE  PROCEDURE  "ADDACT"  ADD  AN  ACTION 

GENERATE  PROCEDURE  "DOACT"  DO  ACTION 

DECLARE  INDEX  VARIABLES 

GENERATE  ACTION  LIST 

UNIVERSAL  QUALIFIER  FOR  LOOP 

GENERATE  ACTION  PAGE 

GENERATE  ACTION  PRESENT 

GENERATE  ACTION  QUERY  (SELECT) 

GENERATE  ACTION  SET 
GENERATE  ACTION  EXIT 
GENERATE  ACTION  HELP 
GENERATE  ACTION  SIGNAL 
GENERATE  ACTION  INSERT 
SELECT  WHERE 
SELECT  OPEN 
FORM  PDATA 

GENERATE  BEGINNING  OF  APPLICATION  OR  REPORT 
MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 
MAKING) 

GENERATE  DATA  BASE  RECORDS  AND  FILE  DECLARATIONS 

GENERATE  FORM  DATA  STRUCTURES 

GENERATE  DATA  DATA  STRUCTURES 

GENERATE  FORM  STRUCTURE  DATA  INITIALIZATION 

GENERATE  FORM  PATH 

GENERATE  NODUPLICATE  DECLARATIONS 

GENERATE  CHANGE  DECLARATIONS 

GENERATE  INSERT  DECLARATIONS 

BUILD  SUBROUTINE  CODE 

MAP  DATABASE 

VISIT  ARRAYS  ON  THIS  FORM 

CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 
CLEAR  NODUPLICATE  FIELDS 
GENERATE  NEWPAG  PROCEDURE 
GENERATE  DATA  BASE  FREAD 

SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY  ARE 
DUPLICATED 

RESET  NODUPLICATE  FIELDS  TO  VALUE  OF  NODUP%D 
CALCULATE  STATISTIC 
RESET  STATISTIC 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


GENAA 

GENERATE  PROCEDURE 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


"ADDACT"  ADD  AN  ACTION 


SYNOPSIS 
GENAA ( ) 

DESCRIPTION 

THIS  ROUTINE  GENERATES  A  PROGRAM  THAT  WILL  ADD  AN  ACTION  TO 
THE  ACTION  LIST  AT  RUN  TIME.  THE  PROGRAM  THAT  IS  GENERATED 
BY  THIS  ROUTINE  IS  FIXED  AND  IS  NOT  CHANGED  FOR  ANY  REPORT, 
IT  IS  ALWAYS  THE  SAME  PROGRAM. 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


GEN  -  GENERATE  A  LINE  OF  CODE 


CALLED  DIRECTLY  BY: 


GENACT  -  GENERATE  ACTIONS 

USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME; 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST; 

SUBSYSTEM; 
SUBDIRECTORY; 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

GENAALO 

DESCRIPTION 

THIS  ROUTINE  TRAVERSES  THE  TRIGGER  DATA  STRUCTURE  FOR  EACH 
TRIGGER  IT  GENERATES  A  CALL  TO  ADD  EACH  ACTION. 

PRIORITIES  FOR  ACTIONS  ARE  DETERMINED  BY  THIS  ROUTINE. 


GENAAL 

GENERATE  PROCEDURE  "ADDAL"  ADD  ACTION  LIST 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


INCLUDE  FILES: 


STDTYP 

FPD 

RW 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


GEN  -  GENERATE  A  LINE  OF  CODE 

SPRINTF 


CALLED  DIRECTLY  BY: 


GENACT  -  GENERATE  ACTIONS 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP 


GENACT 

GENERATE  ACTIONS 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 
GENACT 0 

DESCRIPTION 

THIS  ROUTINE  GENERATES  THE  CODE  TO  IMPLEMENT  TRIGGERS 
AND  ACTIONS.  IT  GENERATES  CODE  TO  ADD  A  LIST  OF  ACTIONS 
TO  ADD  AN  ACTION  AND  GENERATES  THE  CODE  NECESSARY  TO 
PERFORM  AN  ACTION. 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


GENAAL  -  GENERATE  PROCEDURE  "ADDAL"  ADD  ACTION  LIST 

GENAA  -  GENERATE  PROCEDURE  "ADDACT"  ADD  AN  ACTION 

GENDOA  -  GENERATE  PROCEDURE  "DOACT"  DO  ACTION 


CALLED  DIRECTLY  BY: 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

GENAE(TP,  AP) 

TRGLST  *TP; 

ACTLST  *AP; 

INPUTS: 

TP  -  CONDITION  ASSOCIATED  WITH  THIS  ACTION. 
AP  -  THIS  ACTION. 

DESCRIPTION 

GENERATES  THE  EXIT  ACTION 
ARGUMENTS : 


GENAE 

GENERATE  ACTION  EXIT 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


TP  =  TRGLST  * 

AP  =  ACTLST  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


GEN  -  GENERATE  A  LINE  OF  CODE 


CALLED  DIRECTLY  BY: 


GENAL  -  GENERATE  ACTION  LIST 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

GENAH(TP,  AP) 

TRGLST  *TP; 

ACTLST  *AP; 

INPUTS: 

TP  -  CONDITION  ASSOCIATED  WITH  THIS  ACTION. 
AP  -  THIS  ACTION. 

DESCRIPTION 

GENERATES  THE  HELP  ACTION 
ARGUMENTS: 


GENAH 

GENERATE  ACTION  HELP 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


TP  -  TRGLST  * 

AP  =  ACTLST  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 


CALLED  DIRECTLY  BY: 


GENAL  -  GENERATE  ACTION  LIST 
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USED  IN  MAIN  PROGRAM(S) : 
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GRP/MAIN 


-  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

GENAI(TP,  AP) 

TRGLST  *TP; 

ACTLST  *AP; 

INPUTS : 

TP  -  CONDITION  ASSOCIATED  WITH  THIS  ACTION. 
AP  -  THIS  ACTION. 

DESCRIPTION 

GENERATES  THE  INSERT  ACTION 
ARGUMENTS : 


TP  =  TRGLST  * 

AP  =  ACTLST  * 


GENAI 

GENERATE  ACTION  INSERT 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


MAKQR  -  MAKE  QUALIFIED  REFERENCE 

SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 


CALLED  DIRECTLY  BY: 


GENAL  -  GENERATE  ACTION  LIST 
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USED  IN  MAIN  PROGRAM (S) : 


GRP/MAIN 
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-  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

GENAL(TP,  AP) 

TRGLST  *TP; 

ACTLST  *AP; 

INPUTS: 

TP  -  CONDITION  TO  WHICH  THIS  ACTION  BELONGS. 

AP  -  ACTION  TO  GENERATE  CODE  FOR. 

DESCRIPTION 

CALL  THE  PROCEDURE  WHICH  GENERATES  THE  CODE  TO  IMPLEMENT  AN 
ACTION.  ALSO  CALLS  PROCEDURE  TO  GENERATE  FOR  LOOPS  FOR 
UNIVERSAL  QUALIFICATION. 

ARGUMENTS : 


GENAL 

GENERATE  ACTION  LIST 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


TP  =  TRGLST  * 

AP  =  ACTLST  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


UQFOR  -  UNIVERSAL  QUALIFIER  FOR  LOOP 


GEN  -  GENERATE 
GENAP  -  GENERATE 
GENAR  -  GENERATE 
GENAQ  -  GENERATE 
GENAS  -  GENERATE 
GENAE  -  GENERATE 


A  LINE  OF  CODE 
ACTION  PAGE 
ACTION  PRESENT 
ACTION  QUERY  (SELECT) 
ACTION  SET 
ACTION  EXIT 
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GENAH  -  GENERATE  ACTION  HELP 

GENAT  -  GENERATE  ACTION  SIGNAL 

GENAI  -  GENERATE  ACTION  INSERT 


CALLED  DIRECTLY  BY: 


CENTAL  -  GENERATE  TRIGGER  ACTION  LIST 

GENDOA  -  GENERATE  PROCEDURE  "DOACT"  DO  ACTION 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

GENAP(TP,  AP) 

TRGLST  *TP; 

ACTLST  *AP; 

INPUTS: 

TP  -  CONDITION  ASSOCIATED  WITH  THIS  ACTION. 
AP  -  THIS  ACTION. 

DESCRIPTION 

GENERATES  THE  PAGE  ACTION 
ARGUMENTS: 


GENAP 

GENERATE  ACTION  PAGE 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


TP  =  TRGLST  * 

AP  =  ACTLST  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


GEN  -  GENERATE  A  LINE  OF  CODE 

FRMPDAT  -  FORM  PDATA 

SPRINTF 


CALLED  DIRECTLY  BY: 


GENAL  -  GENERATE  ACTION  LIST 
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USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


GENAQ 

GENERATE  ACTION  QUERY 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


(SELECT) 


DESCRIPTION: 


SYNOPSIS 

GENAQ (TP,  AP) 

TRGLST  *TP; 

ACTLST  *AP; 

INPUTS: 

TP  -  CONDITION  ASSOCIATED  WITH  THIS  ACTION. 
AP  -  THIS  ACTION. 

DESCRIPTION 

GENERATES  THE  SELECT  ACTION 
ARGUMENTS : 


TP  =  TRGLST  * 

AP  =  ACTLST  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


SELWHR 

SPRINTF 

GEN 

CLRNDP 

SELOPN 


SELECT  WHERE 

GENERATE  A  LINE  OF  CODE 
CLEAR  NODUPLICATE  FIELDS 
SELECT  OPEN 


CALLED  DIRECTLY  BY: 


GENAL  -  GENERATE  ACTION  LIST 
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USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN 


GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

GENAR(TP,  AP) 

TRGLST  *TP; 

ACTLST  *AP; 

INPUTS: 

TP  -  CONDITION  ASSOCIATED  WITH  THIS  ACTION. 
AP  -  THIS  ACTION. 

DESCRIPTION 

GENERATES  THE  PRESENT  ACTION 
ARGUMENTS : 


GENAR 

GENERATE  ACTION  PRESENT 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


TP  =  TRGLST  * 

AP  =  ACTLST  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


FNDFRM  -  FIND  FORM 

GEN  -  GENERATE  A  LINE  OF  CODE 

ISOPNE  -  DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 

HASDATA  -  DETERMINE  IF  THERE  ARE  ANY  SELECT  STATEMENTS 

HASITEM  -  THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN  ITEM 

WITHIN 


STRCMP 

FRMPDAT  -  FORM  PDATA 
SPRINTF 
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CALLED  DIRECTLY  BY: 
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GENAL  -  GENERATE  ACTION  LIST 

USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

GENAS (TP,  AP) 

TRGLST  *TP; 

ACTLST  *AP; 

INPUTS: 

TP  -  CONDITION  ASSOCIATED  WITH  THIS  ACTION. 
AP  -  THIS  ACTION. 

DESCRIPTION 

GENERATES  THE  SET  ACTION 
ARGUMENTS: 


GENAS 

GENERATE  ACTION  SET 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


TP  =  TRGLST  * 

AP  =  ACTLST  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


ISOPNE  -  DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 

MAKQR  -  MAKE  QUALIFIED  REFERENCE 

STRCPY 

SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 

STRSPN 

STRLEN 
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CALLED  DIRECTLY  DY : 

GENAL  -  GENERATE  ACTION  LIST 

USED  IN  MAIN  PROGRAM(S); 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

GENAT(TP,  AP) 

TRGLST  *TP; 

ACTLST  *AP; 

INPUTS: 

TP  -  CONDITION  ASSOCIATED  WITH  THIS  ACTION. 
AP  -  THIS  ACTION. 

DESCRIPTION 

GENERATES  THE  SIGNAL  ACTION 
ARGUMENTS : 


TP  =  TRGLST  * 

AP  =  ACTLST  * 


GENAT 

GENERATE  ACTION  SIGNAL 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


WARNING  -  ISSUE  WARNING  MESSAGE 
SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 


CALLED  DIRECTLY  BY: 


GENAL  -  GENERATE  ACTION  LIST 
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USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

GENBEG (NAME) 

CHAR  NAME [ ] ; 

INPUTS : 

NAME  -  NAME  OF  THE  APPLICATION  OR  REPORT 

OUTPUTS: 

NONE 

DESCRIPTION 

THIS  ROUTINE  GENERATES  THE  PROLOG  FOR  AN  APPLICATION  OR  A 

REPORT. 

IT  CONSISTS  OF  THE  #INCLUDE'S,  THE  ACTION  STRUCTURE  AND 

POINTERS, 

AND  DECLARATIONS  FOR  SEVERAL  OTHER  FIXED  SIZE  VARIABLES. 
ARGUMENTS : 


GENBEG 

GENERATE  BEGINNING  OF  APPLICATION  OR 

REPORT 

C 

FUNCTION 
INT  0 
GENMN2 

.C 

UI 

RW 

RW/AP 


NAME  =  CHAR  [  ] 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RV\’  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


GFCJ  -  GENERATE  A  LINE  OF  CODE 

SFRINTF 


3-153 


CALLED  DIRECTLY  BY: 
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GENMAIN  -  GENERATE  MAIN  PROGRAM 
USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATTT'N  GROUP: 


GENCHG 

GENERATE  CHANGE  DECLARATIONS 
C 

FUNCTION 
INT  0 
GENMN2 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 
GENCHG 0 

INPUTS/OUTPUTS : 

NONE 

INPUTS: 

NONE 

OUTPUTS: 

NONE 

DESCRIPTION 

THIS  ROUTINE  GENERATES  THE  DECLARATION  TO  HOLD  THE  LAST 

VALUE  OF 

AN  ITEM  WHICH  HAS  A  CHANGE  CONDITION  ON  IT.  THE  FORM  OF  THE 
DECLARATION  IS: 

CHAR  CHG%D[SIZE];  %D  -  NUMBER  OF  FIELD,  SIZE  OF 
FIELD. 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  purpose  not  found  by  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 


STDTYP 

STDIO 

FPD 

RW 


ROUTINES  CALLED: 


SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 
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CALLED  DIRECTLY  BY: 


GENMAIN  -  GENERATE  MAIN  PROGRAM 
USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME:  GENDB 

PURPOSE:  GENERATE  DATA  BASE  RECORDS  AND  FILE 

DECLARATIONS 
LANGUAGE:  C 

MODULE  TYPE:  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE:  GENMN2 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 

DESCRIPTION: 


SYNOPSIS 

GENDB (COUNT) 

INT  COUNT; 

INPUTS : 

COUNT  -  THE  NUMBER  OF  SELECTS  IN  THIS  LIST 

OUTPUTS: 

NONE 

DESCRIPTION 

GENERATES  DECLARATIONS  FOR  SELECT  FILES:  FILE  POINTERS, 

NAMES  AND 

STATUS  CODES. 

ARGUMENTS: 


COUNT  =  INT 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 


CALL, ED  DIRECTLY  BY: 


GEMMA IN  -  GENERATE  MAIN  PROGRAM 
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USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


GENDOA 

GENERATE  PROCEDURE 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


"DO ACT"  DO  ACTION 


SYNOPSIS 
GENDOA ( ) 

DESCRIPTION 

THIS  ROUTINE  GENERATES  THE  CODE  NECESSARY  TO  PERFORM  AN 
ACTION  AT  RUN  TIME.  IT  GENERATES  CODE  FOR  EACH  ACTION  FOR 

EACH 

TRIGGER, 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


GEN  -  GENERATE  A  LINE  OF  CODE 

nCLirJDX  -  DECLARE  INDEX  VARIABLES 

GENAL  -  GENERATE  ACTION  LIST 

STRCHR 
5;  PR  I  NT  F 


CALLED  DIRECTLY  BY: 

GENACT  -  GENERATE  ACTIONS 

ILSED  IN  MAIN  PROGRAM(S): 

GKP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


GENDS 

GENERATE  DATA  DATA  STRUCTURES 
C 

FUNCTION 
INT  0 
GENMN2 

.C 

UI 
RW 

RW/AP 

DESCRIPTION: 


SYNOPSIS 
GENDS 0 

INPUTS/OUTPUTS: 

NONE 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


INPUTS: 

NONE 


OUTPUTS : 

NONE 

DESCRIPTION 

THIS  ROUTINE  GENERATES  A  DATA  STRUCTURE  FOR  EACH  SELECT 
STATEMENT.  THESE  ARE  OF  THE  FORM: 


STRUCT 

{ 

CHAR  DBNAME[20]; 
CHAR  DBID[4]; 

CHAR  HOSTID[3]; 
CHAR  DBMSNAME[30] ; 
CHAR  CR; 

}  DBR%D; 

FIRST) . 


FIELDS  TO  GET  DATA. 


CARRIAGE  RETURN  PAD. 

%D  -  NUMBER  OF  SELECT  (0  IS 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 
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ROUTINES  CALLED: 
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GEN  -  GENERATE  A  LINE  OF  CODE 

SPRINTF 

CALLED  DIRECTLY  BY: 

GENMAIN  -  GENERATE  MAIN  PROGRAM 

USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


GENFP 

GENERATE  FORM  PATH 
C 

FUNCTION 
INT  0 
GENMN2 

.C 

UI 

RW 

RW/AP 


SYNOPSIS 
GENFP 0 

INPUTS/OUTPUTS: 

NONE 


INPUTS: 

NONE 

OUTPUTS : 
NONE 


DESCRIPTION 


THIS  ROUTINE  GENERATES  THE  DECLARATION  TO  HOLD  A  PATH 
NAME  FOR  OPEN  ENDED  FORMS  AND  THE  TOP  FORM(S) .  THE  FORM  OF 
THE  DECLARATIONS  IS: 


CHAR  PATH%D[120]  =  "FORMNAME"; 

FORM  AND 

FORM. 


%D  IS  THE  NUMBER  OF  THE 
FORMNAME  IS  THE  NAME  OF  THE 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 
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CALLED  DIRECTLY  BY: 

GENMAIN  -  GENERATE  MAIN  PROGRAM 

USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 
GENFS (DP) 

FIELD  *DP; 

INPUTS/OUTPUTS 
NONE 

INPUTS: 

(DP)  -  FIELD  POINTER 

OUTPUTS : 

NONE 

DESCRIPTION 

THIS  ROUTINE  USES  THE  STRUCTURE  TAGS  TO  ALLOCATE 
SPACE  FOR  FORM  DATA  FOR  CURRENT  AND  PREVIOUS  IT 
GENERATES  THIS  CODE  FOR  OPEN  ENDED  FORMS  AND  FOR 
OPEN  ENDED  ARRAYS.  THESE  ARE  DECLARED  AS  FOLLOWS: 

STRUCT  FRM%D  FRM%DC,  FRM%DP;  %D  -  NUMBER  OF  THE  FORM. 

ARGUMENTS : 


DP  =  FIELD  * 


GENFS 

GENERATE  FORM  DATA  STRUCTURES 
C 

FUNCTION 
INT  0 
GENMN2 

.C 

UI 

RW 

RW/AP 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 


STDTYP 

STDIO 

FPD 

RW 


ROUTINES  CALLED: 


ISOPNE  -  DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 

HASITEM  -  THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN  ITEM 
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WITHIN 

SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 

GENFS  -  GENERATE  FORM  DATA  STRUCTURES 


CALLED  DIRECTLY  BY: 


GENMAIN  -  GENERATE  MAIN  PROGRAM 

GENFS  -  GENERATE  FORM  DATA  STRUCTURES 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME  ; 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


GENFSD 

GENERATE  FORM  STRUCTURE  DATA 

INITIALIZATION 

C 

FUNCTION 
INT  ( ) 

GENMN2 

•  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

GENFSD(DP) 

FIELD  *DP; 

INPUTS/OUTPUTS: 


INPUTS: 


OUTPUTS : 


DESCRIPTION 

THIS  ROUTINE  INITIALIZES  THE  FORM  CURRENT  AND  PREVIOUS 
BUFFERS  TO  BLANK  FOR  BOTH  OPEN  ENDED  FORMS  AND  OPEN 
ENDED  ITEMS.  THESE  ARE  OF  THE  FORM: 

MEMSET ( &FRM%DC,  '  SIZEOF  FRM%DC) ;  %D  IS  THE  NUMBER  OF 

THE  FORM. 


ARGUMENTS : 


DP  =  FIELD  * 


rriCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 


STDTYP 

STDIO 

FPD 

RW 


ROUTINES  CALLED: 


rSOPNE  -  DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 
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HASITEM 

SPRINTF 

STRLEN 

GEN 

GENFSD 

MAKQR 


THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN  ITEM 
WITHIN 


GENERATE  A  LINE  OF  CODE 

GENERATE  FORM  STRUCTURE  DATA  INITIALIZATION 
MAKE  QUALIFIED  REFERENCE 


CALLED  DIRECTLY  BY: 


GENMAIN  -  GENERATE  MAIN  PROGRA-M 

GENFSD  -  GENERATE  FORM  STRUCTURE  DATA  INITIALIZATION 


USED  IN  MAIN  PROGRAM ( S ) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


GENINS 

GENERATE  INSERT  DECLARATIONS 
C 

FUNCTION 
INT  0 
GENMN2 

•  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

p-pXTTMC  !  \ 

IN PUTS /OUT PUTS : 

NONE 

INPUTS: 

NONE 

OUTPUTS: 

NONE 

DESCRIPTION 

THIS  ROUTINE  GENERATES  THE  DECLARATIONS  FOR  THE  NDML 

INSERT  ACTION. 

THE  FORM  OF  THIS  DECLARATION  IS: 

STRUCT 

( 

STRUCT 
/ 

CHAR  DBID[4 ] ; 

CHAR  HOSTID[ 3 ] ; 

)  INSERT%D; 

IS  FIRST) . 

STRUCT 

{ 

CHAR  DBID[ 4 ] ; 

INSERTED. 

CHAR  HOSTID[ 3 ] ; 

)  INSERTl; 

RECORD. 

CHAR  DUMMY; 

NO  INSERTS. 

)  INSERTPS; 


%D  -  NUMBER  OF  INSERT  (0 

FIELDS  OF  FORM  TO  BE 

ONE  PRESENTATION  SCHEME 
DUMMY  FIELD  IF  THERE  2,re 
NAME  OF  INSERT  STRUCTURE  . 
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i 

IN  .-LTIDE  FILES: 


STDTYP 

STDIO 

FPD 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


GEN  -  GENERATE  A  LINE  OF  CODE 

SPRINTF 


CALLED  DIRECTLY  BY: 


GENMAIN  -  GENERATE  MAIN  PROGRAM 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


GENMAIN 

GENERATE  MAIN  PROGRAM 
C 

FUNCTION 
INT  0 
APMAIN 

.C 

UI 

AP 

APGEN 


SYNOPSIS 

GENMAIN 0 

INPUTS/OUTPUTS: 

NONE 

INPUTS: 

NONE 

OUTPUTS : 

NONE 

DESCRIPTION 

THIS  ROUTINE  GENERATES  THE  FOLLOWING: 

1 .  INCLUDE  STATEMENTS 

2.  MAKINC  IS  USED  TO  GENERATE  FORM  DEFINITION 
FUNCTION  TAGS 

3 .  GENCS  IS  CALLED  TO  INITIALIZE  CONDITION  FLAGS 

4 .  GENFS  IS  USED  TO  GENERATE  CURRENT  AND  PREVIOUS 

BUFFERS  FOR  FORMS 

5.  GENFP  IS  USED  TO  GENERATE  PATH  DECLARATIONS 
PER  FORM 

6.  GENDS  IS  USED  TO  GENERATE  DATA  STRUCTURES  FOR 
EACH  SELECT  STATEMENT 

7.  TYPEDEF  AND  ACTION  LIST  POINTERS  ARE  GENERATED 

8.  THE  FILE  POINTERS,  A  DATABASE  CODE  AND  FILE  NAME 
DATA  STRUCTURES  ARE  GENERATED  FOR  EACH  SELECT 
STATEMENT 

9.  THE  GLOBAL  VARIABLE  I  IS  DECLARED  MAIN  AND 
DECLARATIONS  FOR  VARIABLES  USED  IN  MAIN  ARE 
DECLARED 

10.  CURRENT  FORM  BUFFERS  ARE  INITIALIZED  TO  BLANKS 

11.  THE  CALL  TO  INITFP 

12.  THE  CALL  TO  THE  COBOL  PROGRAM  TO  DO  THE  SELECT 
QUERIES 

13.  EACH  FILE  ASSOCIATED  WITH  A  SELECT  IS  OPENED 
AND  THE  FIRST  RECORD  IS  READ  THE  VALUES  ARE  THEN 
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MAPPED  TO  THE  CURRENT  FORM  BUFFERS  AND  THEN  THE 
CURRENT  FORM  BUFFERS  ARE  COPPIED  TO  THE  PREVIOUS 
SO  THAT  BOTH  ARE  THE  SAME 
14.  THE  FIRST  ACTION  FOR  THE  ACTION  LIST  IS  PUT  ON 
AND  THEN  THE  CODE  TO  PROCESS  THE  ACTION  LIST  IS 
GENERATED 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  PARAMETERS 


STDTYP 

STDIO 

FPD 

RW 

FPPARM 


ROUTINES  CALLED: 


FNDFRM 

HASITEM 

GENBEG 

MKINC 

GEN 

GENTRG 

STRCHR 

GENFSD 

SPRINTF 

GENFS 

GENFP 

GENNDP 

GENCHG 

GENDS 

GENDB 

GENINS 


FIND  FORM 

THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN  ITEM 
WITHIN 

GENERATE  BEGINNING  OF  APPLICATION  OR  REPORT 
MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 
MAKING) 

GENERATE  A  LINE  OF  CODE 
GENERATE  TRIGGERS 

GENERATE  FORM  STRUCTURE  DATA  INITIALIZATION 

GENERATE  FORM  DATA  STRUCTURES 
GENERATE  FORM  PATH 
GENERATE  NODUPLICATE  DECLARATIONS 
GENERATE  CHANGE  DECLARATIONS 
GENERATE  DATA  DATA  STRUCTURES 

GENERATE  DATA  BASE  RECORDS  AND  FILE  DECLARATIONS 
GENERATE  INSERT  DECLARATIONS 


CALLED  DIRECTLY  BY: 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
LSED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-17  1 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


GENNDP 

GENERATE  NODUPLICATE  DECLARATIONS 
C 

FUNCTION 
INT  ( ) 

GENMN2 

.  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 
GENNDP ( ) 

INPUTS/OUTPUTS : 

NONE 

INPUTS: 

NONE 

OUTPUTS : 

NONE 

DESCRIPTION 

GENERATES  DECLARATIONS  FOR  THE  NODUP  OPTION  ON  ITEMS.  THE 

DECLARATIONS 

ARE  OF  THE  FORM: 

CHAR  NODUP%D[SIZE] ;  %D  -  IS  THE  NUMBER  OF  THE  FIELD, 
SIZE  OF  FIELD. 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 


ROUTItlES  CALLED: 


SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 


CALLED  DIREv^TLY  BY: 


GENMAIN  -  GENERATE  MAIN  PROGRAM 
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USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME:  GENPAG 

PURPOSE:  GENERATE  NEWPAG  PROCEDURE 

LANGUAGE :  C 

MODULE  TYPE:  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE:  GRP 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 

DESCRIPTION: 


SYNOPSIS 
GENPAG ( ) 

INPUTS/OUTPUTS: 

NONE 

INPUTS: 

NONE 

OUTPUTS: 

NONE 

DESCRIPTION 

GENERATES  THE  PROCEDURE  NEWPAG  WHICH  INCREMENTS  THE  FIELD 

' . _PAGENO ; ' 

AND  THEN  DOES  AN  OUTSCR. 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 


ROUTINES  CALLED: 


GEN  -  GENERATE  A  LINE  OF  CODE 


CALLED  DIRECTLY  BY: 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

NTM 
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USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME  : 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


GENTAL 

GENERATE  TRIGGER  ACTION  LIST 
C 

FUNCTION 
INT  0 
GENTRG 

•  C 

UI 

AP 

APGEN 


DESCRIPTION: 


SYNOPSIS 

GENTAL(TP) 

TRGLST  *TP; 

INPUTS: 

TP  -  CONDITION  TO  GENERATE  CODE  FOR  ALL  OF  ITS  ACTIONS. 
DESCRIPTION 

GENERATES  CODE  FOR  ALL  THE  ACTIONS  ASSOCIATED  WITH  THE 

CONDITION 

INDICATED  BY  TP. 

ARGUMENTS: 


TP  =  TRGLST  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


GENAL  -  GENERATE  ACTION  LIST 


CALLED  DIRECTLY  BY: 

GENTRG  -  GENERATE  TRIGGERS 

USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


GENTRG 

GENERATE  TRIGGERS 
C 

FUNCTION 
INT  0 
GENTRG 

.C 

UI 

AP 

APGEN 


SYNOPSIS 
GENTRG ( ) 


INPUTS/OUTPUTS : 

NONE 

INPUTS: 

NONE 

OUTPUTS: 

NONE 

DESCRIPTION 

THIS  ROUTINE  GENERATES  "TRIGN ( ) "  FUNCTIONS  WHICH 
DETERMINE 

WHETHER  OR  NOT  A  GIVEN  CONDITION  HAS  BEEN  TRIGGERED. 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


STRCHR 

SPRINTF 

GEN 

MAKQR 

STRCPY 

STRLEN 

STRCAT 

UOFOR 

CENTAL 


GENERATE  A  LINE  OF  CODE 
MAKE  QUALIFIED  REFERENCE 


UNIVERSAL  QUALIFIER  FOR  LOOP 
GENERATE  TRIGGER  ACTION  LIST 
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DCLINDX  -  DECLARE  INDEX  VARIABLES 

STRCMP 

ERROR  -  ISSUE  ERROR  MESSAGE 


CALLED  DIRECTLY  BY: 


GENMAIN  -  GENERATE  MAIN  PROGRAM 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME :  GETCOL 

PURPOSE:  GET  THE  COLUMN  NAME  OF  A  TABLE. COLUMN  OR 

COLUMN  STRING 
LANGUAGE:  C 

MODULE  TYPE:  SUBROUTINE 

FUNCTION  TYPE:  VOID  () 

SOURCE  FILE:  RWSF 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 

DESCRIPTION: 


ARGUMENTS : 


OUTSTR  =  CHAR  [ ] 

COLNAM  =  CHAR  [ ] 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


STRCHR 

STRCPY 


CALLED  DIRECTLY  BY: 


COBESPS  -  COBOL  ES  TO  PS 

MAKWHES/COBWHES  -  COBOL  WHERE  ES 
SELGEN  -  SELECT  GENERATE 

SELWS  -  SELECT  WORKING  STORAGE  SECTION 

INSERT  -  INSERT  PROCEDURE 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME  : 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


GETFILE 

RETURN  A  FILE  POINTER 
THE  USER 
C 

FUNCTION 
FILE  *  0 
GRP 

.  C 

UI 

RW 

RW/AP 


BASED  ON  INPUT  FROM 


SYNOPSIS 

FILE  *GErFILE (NAMPTR) 

CHAR  *NAMPTR; 

INPUTS/OUTPUTS : 

NONE 

INPUTS: 

NAMPTR  -  STRING  WITH  NAME  OF  FILE. 

OUTPUTS: 

FILE  POINTER  IS  RETURNED  THROUGH  THE  FUNCTION  REFERENCE 
DESCRIPTION 

GETFILE  OPENS  THE  FILE  NAMED  BY  THE  INPUT  PARAMETER.  IF 

THE  USER 

DOES  NOT  SPECIFY  THE  . FDL  SUFFIX  IT  IS 
AUTOMATICALLY  APPENDED.  THE  FILE  IS  THEN  OPENED. 

ARGUMENTS : 


tIAMPTR  =  CHAR  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARY.METERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 
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ROUTINES  CALLED: 


ERROR  -  ISSUE  ERROR  MESSAGE 

FOPEN 

SPRINTF 


CALLED  DIRECTLY  BY: 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


USED  IN  MAIN  PROGRAM (S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE; 

FUNCTION  TYPE: 

SOURCE  FILE; 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP; 


GETPTH 
GET  PATH 
C 

FUNCTION 
CHAR  *  ( ) 
RWSP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

CHAR  *GETPTH(PATH,  DPP,  FLDLST) 
CHAR  PATH [ ] ; 

FIELD  **DPP,  *FLDLST; 


INPUTS: 

PATH  -  PATH  TO  BE  RESOLVED  INTO  A  POINTER. 
FLDLST  -  FIELD  HIERARCHY  TO  SEARCH  FOR  A  PATH. 


OUTPUTS : 

DPP  -  POINTER  TO  POINTER  TO  FIELD  INDICATED  BY  PATH. 
DESCRIPTION 

RESOLVES  A  QUALIFIED  NAME  INTO  A  FIELD  POINTER.  REPEATEDLY 

CALLS 

PTHPTR  WITH  FORMS  IN  THE  TOPLST  (SEE  MLPFRM()). 

ARGUMENTS : 


PATH  =  CHAR  [] 

DPP  =  FIELD  ** 

FLDLST  =  FIELD  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


PTHPTR 

STRCPY 

STRUPC 

STRCHR 
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CALLED  DIRECTLY  BY: 


INSRSV 

SELRSV 

CTLRSV 

STATRSV 

TRGRSV 

ACTRSV 

WINRSV 


INSERT  RESOLVE 
SELECT  RESOLVE 
CONTROL  RESOLVE 
STATISTIC  RESOLVE 
TRIGGER  RESOLVE 
ACTION  RESOLVE 
WINDOW  RESOLVE 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP 


GETTBL 

GET  A  TABLE  NAME 
C 

SUBROUTINE 
VOID  0 
RWSP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


OUTSTR  = 
TNUM  = 
COLNAM  = 
SELPTR  = 


CHAR  [  ] 
INT  * 

CHAR  [ ] 
SELECT  * 


INCLUDE  FILES: 


STDTYP 

FPD 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  RETURN  CODES 
REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


STRCHR 

ESCPY 

NULBLK  -  BLANK  FILL  A  STRING 

STRCMP 

STRCPY 


CALLED  DIRECTLY  BY: 


COBESPS  -  COBOL  ES  TO  PS 

MAKWHES/COBWHES  -  COBOL  WHERE  ES 

SELGEN  -  SELECT  GENERATE 

SELWS  -  SELECT  WORKING  STORAGE  SECTION 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


GFLDPT 

GET  FIELD  POINTER 
C 

FUNCTION 
FIELD  *  0 
FLANSP 

.C 

UI 

FE 

FDFE/FLAN 


SYNOPSIS 

FIELD  *GFLDPT(FLDPTR,  S) 
FIELD  *FLDPTR; 

CHAR  *S; 


DESCRIPTION 

RETURN  A  POINTER  TO  THE  NAMED  FIELD  ON  THE  SPECIFIED  FORM. 
ARGUMENTS: 


FLDPTR  =  FIELD  * 

S  =  CHAR  * 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 


STDTYP 

STDIO 

FPD 

RW 

FPCODE 


ROUTINES  CALLED: 


STRCMP 


CALLED  DIRECTLY  BY: 


CHKFRM  -  CHECK  FORM 

YYPARSE  -  FLAN  PARSER 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


GRP/MAIN 

GENERATE  APPLICATION/REPORT  PROGRAM 
C 

FUNCTION 
INT  0 
GRP 

.  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

MAINO  !  THE  EXECUTABLE  IS  NAMED  "GRP"  OR  "GAP". 

INPUTS/OUTPUTS: 

NONE 

INPUTS: 

NONE. 

OUTPUTS: 

NONE 


DESCRIPTION 

THIS  IS  THE  MAIN  ROUTINE  FOR  THE  APPLICATION/REPORT 

GENERATING  PROGRAM. 

IT  PROMPTS  THE  USER  FOR  HIS  . FDL  DEFINITION  FILE,  CALLS 

FLAN  TO 

PARSE  THE  APPLICATION  OR  REPORT  DEFINITION,  WRITES  OUT  THE 

FD  FILES, 

GENERATES  THE  SPECIFIC  DATA  STRUCTURES,  AND  ESTABLISHES  THE 
HIERARCHICAL  REIATIONSHIP  BETWEEN  THE  SELECT  STATEMENTS 

AND  THE 

FORM  HIERARCHY.  IT  THEN  GENERATES  THE  C  CODE  IN  THE 

FOLLOWING  STEPS: 


1 . 
2  . 


3  . 

4  . 


GENERATES  THE  MAIN  PROGRAM 

GENERATES  THE  CODE  FOR  EACH  SUB-ROUTINE  WHERE  THESE 
SUB-ROUTINES 

CORRESPOND  TO  FORMS  IN  THE  HIERARCHY 

GENERATES  THE  CODE  TO  PROCESS  ON  CONDITIONS  AND  ACTIONS 
GENERATES  THE  COBOL  CODE  TO  PROCESS  THE  SELECT 
STATEMENTS 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 
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FPD 

FPDINI 

FPPARM 

RW 

NTM 


-  FORM  PROCESSOR  DATA 

-  FPD  INITIALIZATION 

-  FORM  PROCESSOR  PARAMETERS 

-  REPORT  WRITER  DEFINITIONS 

-  NTM  INTERFACE  INCLUDE  FILE 


ROUTINES  CALLED: 


FRNTND 

GETFILE 

CALLOC 

FLANCI 

FOPEN 

STRCAT 

STRCPY 

WRTFRM 

RWOPN 

GENMAIN 

BLDSUB 

GENACT 

GENPAG 

MDMLGEN 

PMSGLC 

OISCR 

TERMFP 

TRMNDML 

STRCHR 


FORMS  FRONT  END  TO  APPLICATION  GENERATOR 
RETURN  A  FILE  POINTER  BASED  ON  INPUT  FROM  THE 
USER 

FLAN  CALLABLE  INTERFACE 


WRITE  FORM 

REPORT  WRITER  OPEN  FORMS 

GENERATE  MAIN  PROGRAM 

BUILD  SUBROUTINES 

GENERATE  ACTIONS 

GENERATE  NEWPAG  PROCEDURE 

NDML  COBOL  APPLICATION  GENERATOR 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


HAS DATA 

DETERMINE  IF  THERE  ARE  ANY  SELECT 

STATEMENTS 

C 

FUNCTION 
INT  0 
GRP 

•  C 


SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 


DESCRIPTION: 


THAT  TARGET  TO  THE  SCOPE  OF  THIS  FORM. 


SYNOPSIS 

HAS DATA (DP) 

FIELD  *DP; 

INPUTS/OUTPUTS: 

NONE 

INPUTS: 

(DP)  -  FIELD  POINTER 
OUTPUTS : 

HASDATA  RETURNS  A  TRUE  OR  A  FALSE  VALUE  DEPENDING  ON 

WHETHER 

ANY  DATA  WERE  FOUND. 

DESCRIPTION 

THIS  ROUTINE  TRAVERSES  THE  FORM  PROCESSOR  DATA  HIERARCHY  TO 
DETERMINE  IF  ANY  SELECT  STATEMENT  TARGETS  TO  AN  ITEM 

WITHIN  THE 

SCOPE  INDICATED  BY  THE  FIELD  POINTER  WHICH  IS  PASSED  IN  AS 

AN 

INPUT  PARAMETER.  THE  SCOPE  IS  DETERMINED  BY  NOT  PROCESSING 
PAST  WINDOWS. 

ARGUMENTS : 


DP  =  FIELD  * 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 


STDTYP 

STDIO 

FPD 

FPDINI 
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FPPARM  -  FORM  PROCESSOR  PARAMETERS 

RW  -  REPORT  WRITER  DEFINITIONS 

NTM  -  NTM  INTERFACE  INCLUDE  FILE 


ROUTINES  CALLED: 


HAS DATA  -  DETERMINE  IF  THERE  ARE  ANY  SELECT  STATEMENTS 


CALLED  DIRECTLY  BY: 


GENAR  -  GENERATE  ACTION  PRESENT 

BLDSUB  -  BUILD  SUBROUTINES 

HASDATA  -  DETERMINE  IF  THERE  ARE  ANY  SELECT  STATEMENTS 
VISITA  -  VISIT  ARRAYS  ON  THIS  FORM 

SETNDP  -  SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY  ARE 

DUPLICATED 

RSETNDP  -  RESET  NODUPLICATE  FIELDS  TO  VALUE  OF  NODUP%D 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


HAS ITEM 

THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN 
ITEM  WITHIN 
C 

FUNCTION 
INT  0 
GRP 

.  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


THE  SCOPE  OF  REFERENCE. 


SYNOPSIS 

HASITEM(DP) 

FIELD  *DP; 

INPUTS/OUTPUTS: 

NONE 

INPUTS: 

(DP)  -  FIELD  POINTER 
OUTPUTS: 

RETURNS  TRUE  IF  AN  ITEM  IS  WITHIN  THE  SCOPE  OF  REFERENCE. 
DESCRIPTION 

THIS  ROUTINE  TRAVERSES  THE  FORMS  HIERARCHY  LOOKING  FOR 

ITEMS. 

THE  SCOPE  OF  REFERENCE  IS  DETERMINED  BY  NOT  TRAVERSING  PAST 
OPEN  ENDED  ARRAYS  OR  WINDOWS.  THE  ROUTINE  STOPS  WHEN  AN 

ITEM 

IS  FOUND. 

ARGUMENTS : 


DP  =  FIELD  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 
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ROUTINES  CALLED: 


HASITEM  -  THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN  ITEM 

WITHIN 


CALLED  DIRECTLY  BY: 


GENMAIN 

GENAR 

FRMPDAT 

MKINC 

GENFS 

GENFSD 

BSCODE 

VISITA 

HASITEM 


GENERATE  MAIN  PROGRAM 
GENERATE  ACTION  PRESENT 
FORM  PDATA 

MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 
MAKING) 

GENERATE  FORM  DATA  STRUCTURES 
GENERATE  FORM  STRUCTURE  DATA  INITIALIZATION 
BUILD  SUBROUTINE  CODE 
VISIT  ARRAYS  ON  THIS  FORM 

THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN  ITEM 
WITHIN 


USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME  : 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST  : 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

HAS LOWER (FP,  VP) 

FIELD  *FP; 

VARLST  *VP; 

IN PUTS/ OUTPUTS : 

NONE 

INPUTS: 

FP  -  FIELD  POINTER 

VP  -  VARIABLE  LIST  FROM  A  SELECT 

OUTPUTS : 

NONE 

DESCRIPTION 

CHECKS  THE  FORM  FP  TO  SEE  IF  ANY  OF  THE  VARIABLES  IN  THE 

SELECT  LIST 

TARGET  TO  A  FORM  WHICH  IS  LOWER  IN  THE  HIERARCHY  THAN  FP. 

USED  BY 

CHKGPP  AND  READDB. 

ARGUMENTS : 


FP  -  FIELD  * 

VP  =  VARLST  * 


HAS LOWER 

HAS  A  LOWER  FORM  WHICH  READS  THE  SAME 
DATA  RECORD? 

C 

FUNCTION 
INT  ( ) 

GRP 

.  C 

UI 

RW 

RW/AP 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  V^rRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 
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CALLED  DIRECTLY  BY: 


READDB  -  READ  DATA  BASE 

CHKGRP  -  CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 


USED  IN  MAIN  PROGRAM(S) ; 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME:  INDENT 

PURPOSE:  INDENT  A  LINE  OF  GENERATED  CODE 

LANGUAGE :  C 

MODULE  TYPE:  SUBROUTINE 

FUNCTION  TYPE:  VOID  () 

SOURCE  FILE:  NDMLGEN 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 

DESCRIPTION: 


ARGUMENTS : 


M  =  INT 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

FPPARM  -  FORM  PROCESSOR  PARAMETERS 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 

RW  -  REPORT  WRITER  DEFINITIONS 

NTM  -  NTM  INTERFACE  INCLUDE  FILE 

CTLCHR  -  CONTROL  CHARACTERS 


ROUTINES  CALLED: 


PUTC 


CALLED  DIRECTLY  BY: 


MAKWHES/COBWHES  -  COBOL  WHERE  ES 

MAKWHES  -  MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA  VARIABLES 

SELGEN  -  SELECT  GENERATE 

ASSIGN  -  ASSIGN  FILE  SECTION 

FD  -  FD  SECTION  DECLARATIONS 

CLSFIL  -  CLOSE  FILES 

ENDGEN  -  END  GERNERATE 

PROCGEN  -  PROCEDURE  DIVISION  GENERATE 

DATAGEN  -  DATA  DIVISION  GENERATE 

FILELNK  -  FILE  LINKAGE  SECTION  GENERATE 

OPNFIL  -  GENERATE  OPEN  FILE  SECTION 

USING  -  GENERATE  USING  SECTION 

SELWS  -  SELECT  WORKING  STORAGE  SECTION 

TNSWS  -  INSERT  WORKING  STORAGE  SECTION 
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INSERT 

NDMLLAB 

COBPE 


USED  IN  MAIN 


GRP/MAIN 


-  INSERT  PROCEDURE 

-  GENERATE  LABELS 

-  COBOL  PE 


PROGRAM (S) : 


-  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP 


INSERT 

INSERT  PROCEDURE 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

•  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


LANG  =  INT 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

NTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 

FPRINTF 

GETCOL  -  GET  THE  COLUMN  NAME  OF  A  TABLE. COLUMN  OR  COLUMN 

STRING 

DASH  -  WRITE  DASH 


CALLED  DIRECTLY  BY: 


STDCODE  -  STANDARD  COBOL  CODE 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


INSRSV 

INSERT  RESOLVE 
C 

SUBROUTINE 
VOID  0 
RWSP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION; 


SYNOPSIS 

VOID  INSRSV (INSPTR,  TRGPTR,  ACTPTR) 

INSERT  *INSPTR; 

TRGLST  *TRGPTR; 

ACTLST  *ACTPTR; 

INPUTS: 

INSPTR  -  INSERT  FROM  WHICH  TO  LOOK  FOR  PATH. 

TRGPTR  -  CONDITION  THIS  INSERT  IS  ASSOCIATED  WITH. 

ACTPTR  -  ACTION  THIS  INSERT  IS  ASSOCIATED  WITH. 

DESCRIPTION 

RESOLVES  ALL  QUALIFIED  NAMES  INTO  FIELD  POINTERS  FOR  ALL 

NAMES 

WHICH  ARE  ROOTED  IN  INSERT  (SELECT,  VALUE  LIST) . 
ARGUMENTS : 


INSPTR  =  INSERT  * 
TRGPTR  =  TRGLST  * 
ACTPTR  =  ACTLST  * 


INCLUDE  FILES: 


STDTYP 

FPD 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  RETURN  CODES 
REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


UQPTH  -  UNIVERSAL  QUALIFIER  PATH 

ERROR  -  ISSUE  ERROR  MESSAGE 

GETPTH  -  GET  PATH 
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CALLED  DIRECTLY  BY: 


ACTRSV  -  ACTION  RESOLVE 

USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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INSWS 

INSERT  WORKING  STORAGE  SECTION 
C 

FUNCTION 
INT  0 
NDMLGEN 

.C 

UI 
RW 

RW/AP 

DESCRIPTION: 


ARGUMENTS : 


LANG  =  INT 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

NTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


NULBLK 

STRCPY 

DASH 

INDENT 

FPRINTF 

MAKES 

SAVEES 


BLANK  FILL  A  STRING 
WRITE  DASH 

INDENT  A  LINE  OF  GENERATED  CODE 

MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 
SAVE  ES  INFORMATION 


CALLED  DIRECTLY  BY: 


DATAGEN  -  DATA  DIVISION  GENERATE 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST  : 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

ISOPNE  (DP) 

FIELD  *DP; 

INPUTS/OUTPUTS: 

NONE 

INPUTS: 

(DP)  -  FIELD  POINTER 

OUTPUTS: 

THIS  ROUTINE  RETURNS  TRUE  IF  THIS  FIELD 
IS  OPEN  ENDED. 

DESCRIPTION 

THIS  LOOKS  UP  THE  FORMS  HIERARCHY  TREE  TO  DETERMINE  IF  ITS 
AN  FORM  OF  AN  OPEN  ENDED  ARRAY. 

ARGUMENTS : 


ISOPNE 

DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 
C 

FUNCTION 
INT  0 
GRP 

.C 

UI 

RW 

RW/AP 


DP  =  FIELD  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 


CALLED  DIRECTLY  BY: 


GENAR  -  GENERATE  ACTION  PRESENT 

GENAS  -  GENERATE  ACTION  SET 
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GENFS  -  GENERATE  FORM  DATA  STRUCTURES 

GENFSD  -  GENERATE  FORM  STRUCTURE  DATA  INITIALIZATION 

MAKQR  -  MAKE  QUALIFIED  REFERENCE 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME  : 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

VOID  MAKACT(TYPE) 

CHAR  TYPE; 

DESCRIPTION 

MAKES  AN  ACTLST  NODE,  PUTS  IN  VALUES  AND  ADDS  IT  TO  THE 

LIST 


MAKACT 

MAKE  ACTION  LIST  ELEMENT 
C 

SUBROUTINE 
VOID  0 
YTAB 

.C 

UI 

FE 

FDFE/FLAN 


ARGUMENTS: 

TYPE  =  CHAR 


INCLUDE  FILES: 


FLAN. Y" 

STDTYP 

STDIO 

CTYPE 

FPD 

FPPARM 

RW 

MATH 


****  PURPOSE  NOT  FOUND  BY 
STANDARD  TYPE  DEFINITIONS 
****  PURPOSE  NOT  FOUND  BY 
****  PURPOSE  NOT  FOUND  BY 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  PARAMETERS 
REPORT  WRITER  DEFINITIONS 
****  PURPOSE  NOT  FOUND  BY 


STRIPPER  **** 

STRIPPER  **** 
STRIPPER  **** 


STRIPPER  **** 


ROUTINES  CALLED: 


MYALLOC  -  MY  MALLOC 


CALLED  DIRECTLY  BY: 


YYPARSE  -  FLAN  PARSER 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MAKES 

MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 
C 

FUNCTION 
INT  0 
MAKES 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

MAKES  (LANG,SPTR,REC_CNT_PTR) 

INT  LANG; 

TBLLST  *TPTR; 

INT  SELNO; 

INT  *REC_CNT_PTR; 

DESCRIPTION 

WRITES  A  RECORD  STRUCTURE  ON  A  FILE  IN  THE  CURRENT 
DIRECTORY  FOR  THE  GIVEN  TABLE  OR  VIEWNAME. 

ALSO  CREATES  A  EDIT  CONVERSION  RECORD  STRUCTURE  FOR  THE 

EACH 

EXTERNAL  SCHEMA  DATA  ITEM 
ARGUMENTS: 


LANG  =  INT 

TBLNAM  =  CHAR  * 

TBLNUM  INT 

SELNO  =  INT 

REC  CNT  PTR  =  INT  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


CDMESQY 

ERROR 

NULBLK 

DASH 

CES 


PROGRAM  NAME  CDMESQY 
ISSUE  ERROR  MESSAGE 
BLANK  FILL  A  STRING 
WRITE  DASH 
C  ES 
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COBES 

CCONV 

COBCONV 

STRCPY 

STRNCPY 

STRLEN 


COBOL  ES  RECORD 
C  CONVERSIONS 
COBOL  CONVERSIONS 


CALLED  DIRECTLY  BY: 


SELWS  -  SELECT  WORKING  STORAGE  SECTION 

INSWS  -  INSERT  WORKING  STORAGE  SECTION 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-204 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME : 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MAKES/CNUMPIC 
C  NUMBERS 
C 

SUBROUTINE 
VOID  0 
MAKES 

.C 

UI 

RW 

RW/AP 


DESCRIPTION; 


ARGUMENTS 

: 

M  = 

T  = 

I  NT 

INT 

INCLUDE  FILES: 

STDTYP 

STDIO 

FPD 

RW 

-  STANDARD  TYPE  DEFINITIONS 

-  ****  PURPOSE  NOT  FOUND  BY 

-  FORM  PROCESSOR  DATA 

-  REPORT  WRITER  DEFINITIONS 

ROUTINES 

CALLED: 

FPRINTF 

STRCAT 


CALLED  DIRECTLY  BY: 

COBCONV  -  COBOL  CONVERSIONS 

USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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MAKES/INDENT 

INDENT 

C 

SUBROUTINE 
VOID  0 
MAKES 

•  C 

UI 

RW 

RW/AP 


ARGUMENTS : 


M  =  INT 

T  =  INT 


NAME  : 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORI4  PROCESSOR  DATA 

RW  -  REPORT  WRITE  .  DEFINITIONS 


ROUTINES  CALLED: 


PUTC 


CALLED  DIRECTLY  BY: 


CES 

COBES 

CCONV 

COBCONV 


C  ES 

COBOL  ES  RECORD 
C  CONVERSIONS 
COBOL  CONVERSIONS 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-206 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME : 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


ARGUMENTS : 


MAKES/NUMPIC 

NUMBER  PICTURE  CLAUSE 

C 

SUBROUTINE 
VOID  0 
MAKES 

.C 

UI 

RW 

RW/AP 


M  =  INT 

T  =  INT 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

RW 


STANDARD  TYPE  DEFINITIONS 
****  PURPOSE  NC'-  .  wUKD  BY  STRIPPER 
FORM  PROCESSO-.  DATA 
REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLEj: 
FPRINTF 


CALLED  DIRECTLY  BY: 


COBES  -  COBOL  ES  RECORD 

COBCONV  -  COBOL  CONVERSIONS 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAI4 


★ 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MAKINS 
MAKE  INSERT 
C 

SUBROUTINE 
VOID  0 
PSSTRC 

.C 

UI 

RW 

RW/AP 


DESCRIPTION; 


ARGUMENTS : 


LANG  =  INT 

IPTR  =  INSERT  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


PSSTRC/INDENT  -  INDENT 
FPRINTF 

PSSTRC/CSUB  -  C  SUBSTITUTE 
PSSTRC/COBSUB  -  COBOL  SUBSTITUTE 


CALLED  DIRECTLY  BY: 


NDMLLNK  -  LINKAGE  SECTION 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE ; 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MAKINT 

MAKE  EXPRESSION  INTO  AN  INTEGER 
C 

FUNCTION 
ENODE  *  ( ) 

FLANSP 

.C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

ENODE  *MAKINT(EP) 

ENODE  *EP; 

DESCRIPTION 

CONVERT  THE  SPECIFIED  EXPRESSION  TO  INTEGER  AND  RETURN 

POINTER  TO  NEW 

EXPRESSION. 


ARGUMENTS : 


EP  =  ENODE  * 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 


STDTYP 

STDIO 

FPD 

RW 

FPCODE 


ROUTINES  CALLED: 


MYALLOC  -  MY  MALLOC 


CALLED  DIRECTLY  BY : 

YYPARSE  -  FLAN  PARSER 

USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-209 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE; 
FUNCTION  TYPE; 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


MAKPS 

MAKES  THE  PRESENTATION  SCHEMA  RECORD 

STRUCTURE 

C 

SUBROUTINE 
VOID  0 
PSSTRC 

.C 


HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 


DESCRIPTION: 


SYNOPSIS 

MAKPS (LANG,  SPTR) 

I NT  LANG; 

SELECT  *SPTR; 

DESCRIPTION 

WRITES  A  RECORD  STRUCTURE  ON  A  FILE  IN  THE  CURRENT 
DIRECTORY  FOR  THE  GIVEN  SELECT. 

THE  RECORD  STRUCTURE  INCLUDES  ALL  THE  FIELDS  ON  THE  FORM 

THAT  THE 

SELECT  IS  SELECTING  INTO. 

ARGUMENTS: 


LANG  =  INT 

SPTR  =  SELECT  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

FPPARM  -  FORM  PROCESSOR  PARAMETERS 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


PSSTRC/CSUB  -  C  SUBSTITUTE 
PSSTRC/COBSUB  -  COBOL  SUBSTITUTE 


CALLED  DIRECTLY  BY: 


SELWS  -  SELECT  WORKING  STORAGE  SECTION 
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USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MAKQR 

MAKE  QUALIFIED  REFERENCE 
C 

FUNCTION 
CHAR  *  ( ) 

GRP 

•  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

CHAR  *MAKQR(DP,  SUFFIX,  SI,  TFLDP,  AFLDP) 
FIELD  *DP; 

CHAR  SUFFIX; 

CHAR  S 1 [ ] ; 

FLDLST  *TFLDP,  *AFLDP; 

INPUTS/OUTPUTS: 

NONE 


INPUTS: 

DP  -  FIELD  POINTER  TO  AN  ITEM. 

SUFFIX  -  THIS  IS  A  CHARACTER  VALUE  OF  EITHER  C  OR  P 
TO  REPRESENT  CURRENT  OR  PREVIOUS. 

TFLDP  -  LIST  OF  FIELDS  TO  GENERATE  A  "TINDX%D"  INDEX 

REFERENCE. 

AFLDP  -  LIST  OF  FIELDS  TO  GENERATE  A  ”AINDX%D"  INDEX 

REFERENCE. 


OUTPUTS : 

SI  -  THIS  IS  THE  QUALIFIED  REFERENCE  CHARACTER  STRING 
DESCRIPTION 

THIS  ROUTINE  STARTS  AT  THE  ITEM  POINTER  LOOKING  UP  THE  FORM 
PROCESSOR  HIERARCHY  TO  GENERATE  A  FULLY  QUALIFIED 

REFERENCE  WHICH 

CORRESPONDS  TO  THOSE  CURRENT  AND  PREVIOUS  DATA  STRUCTURES 

GENER/iTED 

BY  MAKING. 


ARGUMENTS : 


DP  = 

SUFFIX  = 
SI  = 
TFLDP  = 
AFLDP  = 


FIELD  * 

CHAR 
CHAR  [  ] 

FLDLST  * 
FLDLST  * 
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INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 


ROUTINES  CALLED: 


STRCAT 

STRCPY 

SPRINTF 

ISOPNE  -  DETERMINE  IF  THIS  FIELD  IS  OPEN  ENDED 


CALLED  DIRECTLY  BY: 


GENTRG 

GENAS 

GENAI 

SELWHR 

GENFSD 

MAPDB 

VISITA 

SETNDP 


RSETNDP 

CALCSTAT 

RSETSTAT 


GENERATE  TRIGGERS 
GENERATE  ACTION  SET 
GENERATE  ACTION  INSERT 
SELECT  WHERE 

GENERATE  FORM  STRUCTURE  DATA  INITIALIZATION 
MAP  DATABASE 

VISIT  ARRAYS  ON  THIS  FORM 

SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY  ARE 
DUPLICATED 

RESET  NODUPLICATE  FIELDS  TO  VALUE  OF  NODUP%D 
CALCULATE  STATISTIC 
RESET  STATISTIC 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST; 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MAKSTR 

MAKE  EXPRESSION  INTO  A  STRING 
C 

FUNCTION 
ENODE  *  ( ) 

FLANSP 

.C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

ENODE  *MAKSTR(EP) 
ENODE  *EP; 


DESCRIPTION 

CONVERT  THE  SPECIFIED  EXPRESSION  TO  STRING  AND  RETURN 

POINTER  TO  NEW 

EXPRESSION. 


ARGUMENTS : 


EP  =  ENODE  * 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 


STDTYP 

STDIO 

FPD 

RW 

FPCODE 


ROUTINES  CALLED: 


MYALLOC  -  MY  MALLOC 


CALLED  DIRECTLY  BY: 


YYPARSE  -  FLAN  PARSER 
USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MAKWH 

MAKE  WHERE 
C 

SUBROUTINE 
VOID  0 
PSSTRC 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS: 


LANG  =  INT 

SPTR  =  SELECT  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


PSSTRC/INDENT  -  INDENT 
FPRINTF 

PSSTRC/CSUB  -  C  SUBSTITUTE 
PSSTRC/COBSUB  -  COBOL  SUBSTITUTE 


CALLED  DIRECTLY  BY: 

NDMLLNK  -  LINKAGE  SECTION 

USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MAKWHES 

MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA 

VARIABLES 

C 

SUBROUTINE 
VOID  0 
MAKWHES 

•  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

MAKWHES (LANG,  SPTR) 

I NT  LANG; 

SELECT  *SPTR; 

DESCRIPTION 

WRITES  A  WHERE  CLAUSE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

FOR  ALL 

EXTERNAL  SCHEMA  COLUMNS  THAT  MAP  TO  PRESENTATION  ITEMS  IN 

THE 

WHERE  CLAUSE  OF  THE  SELECT.  IT  IS  ALLOWABLE  FOR  ONE  ES 

ITEM  TO 

MAP  TO  MORE  THAN  ONE  PS  ITEM 
ARGUMENTS : 


LANG  =  INT 

SPTR  =  SELECT  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 

FPRINTF 

HAKWHES/CWHES  -  C  WHERE  ES 
MAKWHES/COBWHES  -  COBOL  WHERE  ES 
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CALLED  DIRECTLY  BY: 


SELWS  -  SELECT  WORKING  STORAGE  SECTION 

USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-217 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME; 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY; 
DOCUMENTATION  GROUP 

DESCRIPTION: 


MAKWHES/COBWHES 
COBOL  WHERE  ES 
C 

SUBROUTINE 
VOID  0 
MAKWHES 

•  C 

UI 

RW 

RW/AP 


ARGUMENTS : 


ESWH_PTR  = 
COLWH_PTR  = 
SPTR  = 
LOOPCNT  = 


PREDOPER  * 
PREDOPER  * 
SELECT  * 

INT 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


MAKWHES/NUMPIC  -  NUMBER  PICTURE  CLAUSE 
FPRINTF 

INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 

DASH  -  WRITE  DASH 

GETTBL  -  GET  A  TABLE  NAME 

GETCOL  -  GET  THE  COLUMN  NAME  OF  A  TABLE. COLUMN  OR  COLUMN 

STRING 


CALLED  DIRECTLY  BY : 

MAKWHES  -  MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA  VARIABLES 
USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MAKWHES/CWHES 
C  WHERE  ES 
C 

SUBROUTINE 
VOID  0 
MAKWHES 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


ESWH_PTR  = 
COLWH_PTR  = 
SPTR  = 
LOOPCNT  = 


PREDOPER  * 
PREDOPER  * 
SELECT  * 

INT 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 


CALLED  DIRECTLY  BY: 


MAKWHES  -  MAKE  THE  WHERE  CLAUSE  EXTERNAL  SCHEMA  VARIABLES 


USED  IN  MAIN  PROGRAM(S): 

GPP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME; 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MAKWHES/NUMPIC 
NUMBER  PICTURE  CLAUSE 
C 

SUBROUTINE 
VOID  0 
MAKWHES 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS 

; 

^9  3 

II  II 

INT 

INT 

INCLUDE  FILES: 

STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

-  STANDARD  TYPE  DEFINITIONS 

_  ****  PURPOSE  NOT  FOUND  BY  STRIPPER 

-  FORM  PROCESSOR  DATA 

-  FORM  PROCESSOR  PARAMETERS 

-  FORM  PROCESSOR  RETURN  CODES 

-  REPORT  WRITER  DEFINITIONS 

ROUTINES 

CALLED: 

FPRINTF 


CALLED  DIRECTLY  BY: 

MAKWHES/COBWHES  -  COBOL  WHERE  ES 

USED  IN  MAIN  PROGRAM(S) : 

GRP/MATN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-220 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MAPDB 

MAP  DATABASE 
C 

FUNCTION 
INT  ( ) 

GRP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 


INPUTS/OUTPUTS: 

NONE 


INPUTS: 

(DP)  -  FIELD  POINTER 

OUTPUTS: 

NONE 

DESCRIPTION 

TRAVERSES  ALL  SELECTS  LOOKING  FOR  ONES  THAT  TARGET  TO  THE 

SCOPE 

OF  THE  FORM  INDICATED  BY  THE  INPUT  PARAMETER.  IT  GENERATES 
STATEMENTS  OF  THE  FORM: 

MEMCPY (FRMPTR->FIELD,  DBR%D. FIELD,  SIZE);  %D  -  NUMBER  OF 

SELECT. 


ARGUMENTS : 


FP  =  FIELD  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 
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ROUTINES  CALLED: 


STRCHR 

MAKQR 

SPRINTF 

STRLEN 

GEN 


MAKE  QUALIFIED  REFERENCE 


GENERATE  A  LINE  OF  CODE 


CALLED  DIRECTLY  BY: 

BSCODE  -  BUILD  SUBROUTINE  CODE 

USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME:  MKINC 

PURPOSE:  MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 

MAKING) 

LANGUAGE :  C 

MODULE  TYPE:  FUNCTION 

FUNCTION  TYPE:  INT  () 

SOURCE  FILE:  GENMN2 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 

DESCRIPTION: 


SYNOPSIS 

MKINC(FP) 

FIELD  *FP; 

INPUTS/OUTPUTS: 

NONE 

INPUTS: 

FP  -  FORM  POINTER 

OUTPUTS : 

NONE 

DESCRIPTION 

GENERATES  THE  STRUCTURE  TAGS  FOR  ALL  THE  FORMS  USED  IN  AN 

APPLICATION 

OR  REPORT,  THIS  UPPER  LEVEL  PROCEDURE  TRAVERSES  ALL  FORMS 

WHICH  ARE 

PRESENTED  IN  WINDOWS.  THE  DATA  STRUCTURES  ARE  OF  THE  FORM: 

#IFNDEF  FRM7  MAKE  SURE  THE  FORM  IS 

DECLARED  ONCE  ONLY. 

STRUCT  FRM7  STRUCTURE  TAG. 

{ 

CHAR  DBID[4];  DATA  FIELDS  (ITEMS)  ON 

THE  FORM. 

CHAR  DBNAME[20]; 

CHAR  HOSTID[ 3 ] ; 

CHAR  DBMSNAME[ 30]  ; 

)  ;  (*  INSRT  *) 

^DEFINE  FRM7  DEFINE  A  SYMBOL. 

#ENDIF 

#IFNDEF  FRM3 
STRUCT  FRM3 
( 

CHAR  PDATE[10]; 

STRUCT  FRM7  FRM7[10];  (*  INSRT  *)  A  SUBFORM  OF 
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FORM  3. 
}  ;  (*  SEL45  *) 

#DEFINE  FRM3 
#ENDIF 

ARGUMENTS : 


FP  =  FIELD  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


MKINC  -  MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 

MAKING) 

HASITEM  -  THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN  ITEM 

WITHIN 

SPRINTF 

STRLEN 

BLEN 

GEN  -  GENERATE  A  LINE  OF  CODE 

ERROR  -  ISSUE  ERROR  MESSAGE 


CALLED  DIRECTLY  BY: 


GENMAIN  -  GENERATE  MAIN  PROGRAM 

MKINC  -  MAKE  INCLUDE  (ACTUALLY  STRUCTURE  TAGS  ALA 

MAKING) 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


MKPOS 

MAKE  POSITION  NODE 
C 

FUNCTION 
POS  *  0 
FLANSP 

.C 

UI 

FE 

FDFE/FLAN 


SYNOPSIS 

POS  *MKPOS(HPOS,  HMIN,  HLOC,  HREF,  VPOS ,  VMIN,  VLOC,  VREF) 
INT  HPOS,  HMIN,  HLOC; 

CHAR  *HREF; 

INT  VPOS,  VMIN,  VLOC; 

CHAR  *VREF; 

DESCRIPTION 

CREATES  THE  SPECIFIED  POSITION  NODE  AND  ADDS  IT  TO  THE 

LIST.  HPOS  AND 

VPOS  ARE  THE  REFERENCE  POINTS  ON  THE  CURRENT  FIELD,  HMIN 

AND  VMIN  ARE  THE 

LOCATION  RELATIVE  TO  THE  REFERENCE  FIELD,  HLOC  AND  VLOC 

ARE  THE  REFERENCE 

POINTS  ON  THE  REFERENCE  FIELD,  AND  HREF  AND  VREF  ARE  THE 

REFERENCE 

FIELDS. 


ARGUMENTS : 


HPOS  = 

INT 

HMIN  = 

INT 

HLOC  = 

INT 

HREF  = 

CHAR 

VPOS  = 

INT 

VMIN  = 

INT 

VLOC  = 

INT 

VREF  = 

CHAR 

INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

RW 

FPCODE 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 
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ROUTINES  CALLED: 
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MYALLOC  -  MY  MALLOC 

CALLED  DIRECTLY  BY: 

YY PARSE  -  FLAN  PARSER 

USED  IN  MAIN  PROGRAM{S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Modu?  cumentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

MLPFRMO 

DESCRIPTION 

MAKES  TWO  LISTS  OF  PRESENTED  FORMS.  ONE  LIST  POINTED  TO  BY 

PRSFRM, 

CONTAINS  ALL  PRESENTED  FORMS.  THE  SECOND  LIST  POINTED  TO 

BY  TOPFRM, 

CONTAINS  ALL  FORMS  PRESENTED  IN  THE  WINDOW  SCREEN. 


MLPFRM 

MAKE  A  LIST  OF  PRESENTED  FORMS 
C 

FUNCTION 
INT  0 
RWSP 

.C 

UI 

RW 

RW/AP 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  RETURN  CODES 
REPORT  WRITER  DEFINITIONS 


STDTYP 

FPD 

FPCODE 

RW 


ROUTINES  CALLED: 


FNDFRM  -  FIND  FORM 

ERROR  -  ISSUE  ERROR  MESSAGE 

MALLOC 


CALLED  DIRECTLY  BY: 

RWOPN  -  kEPORT  WRITER  OPEN  FORMS 

USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


MYALLOC 
MY  MALLOC 
C 

FUNCTION 
CHAR  *  ( ) 
FLANSP 

.C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

CHAR  *MYALLOC(SIZE) 

UNSIGNED  SIZE; 

DESCRIPTION 

ALLOCATE  THE  SPECIFIED  MEMORY  IF  POSSIBLE,  ELSE  ISSUE 

FATAL  ERROR 


ARGUMENTS : 


SIZE  =  UNSIGNED 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 


ROUTINES  CALLED: 


FATAL  -  ISSUE  FATAL  ERROR  MESSAGE 

MALLOC 


CALLED  DIRECTLY  BY: 


CHKFLD 

-  CHECK  FIELD 

CHKARY 

-  CHECK  ARRAY 

CSTASH 

-  CHARACTER  STASH 

WRTEXP 

-  WRITE  EXPRESSION 

MKPOS 

-  MAKE  POSITION  NODE 

MAKINT 

-  MAKE  EXPRESSION  INTO  AN  INTEGER 

MAKSTR 

-  MAKE  EXPRESSION  INTO  A  STRING 

MAKACT 

-  MAKE  ACTION  LIST  ELEMENT 

YYPARSE 

-  FLAN  PARSER 
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USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


NDMLGEN 

NDML  COBOL  APPLICATION  GENERATOR 
C 

FUNCTION 
CHAR  *  ( ) 

NDMLGEN 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

NDMLGEN ( ) 

DESCRIPTION 

CALLS  THE  APPROPRIATE  ROUTINES  TO  GENERATE  THE 

PRESENTATION 

SCHEMA  RECORD  STRUCTURE,  THE  EXTERNAL  SCHEMA  RECORD 

STRUCTURE 

AND  THE  CONVERSION  CODE  TO  GO  FROM  ONE  CDM  DATA  TYPE  TO 

ANOTHER. 

AND  THE  NDML  COMMANDS  SPECIFIED. 

ARGUMENTS : 


LANG  =  INT 

APNAME  =  CHAR  [ ] 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

NTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


STRNCPY 

SPRINTF 

FOPEN 

SYSMSG 

STDCODE  -  STANDARD  COBOL  CODE 
FCLOSE 
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CALLED  DIRECTLY  BY: 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-231 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


ARGUMENTS: 


TYPE  =  CHAR 


INCLUDE  FILES: 


STDTYP 

-  STANDARD  TYPE 

DEFINITIONS 

STDIO 

-  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD 

-  FORM  PROCESSOR 

DATA 

FPPARM 

-  FORM  PROCESSOR 

PARAMETERS 

FPCODE 

-  FORM  PROCESSOR 

RETURN  CODES 

RW 

-  REPORT  WRITER 

DEFINITIONS 

NTM 

-  NTM  INTERFACE 

INCLUDE  FILE 

CTLCHR 

-  CONTROL  CHARACTERS 

NDMLLAB 

GENERATE  LABELS 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

.C 

UI 

RW 

RW/AP 


ROUTINES  CALLED: 


INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 

FPRINTF 


CALLED  DIRECTLY  BY: 


PROCGEN  -  PROCEDURE  DIVISION  GENERATE 
USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


NDMLLNK 

LINKAGE  SECTION 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS: 


LANG  =  INT 

TYPE  =  CHAR 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

NTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


MAKWH  -  MAKE  WHERE 

MAKINS  -  MAKE  INSERT 


CALLED  DIRECTLY  BY: 


DATAGEN  -  DATA  DIVISION  GENERATE 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME : 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


NULBLK 

BLANK  FILL  A  STRING 
C 

SUBROUTINE 
VOID  () 

NDMLGEN 

.C 

UI 

RW 

RW/AP 


ARGUMENTS : 


TMPSTR  =  CHAR  [ ] 

INSTR  =  CHAR  [ ] 


INCLUDE  FILES: 


STDTYP 

-  STANDARD  TYPE 

DEFINITIONS 

STDIO 

-  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD 

-  FORM  PROCESSOR 

DATA 

FPPARM 

-  FORM  PROCESSOR 

PARAMETERS 

FPCODE 

-  FORM  PROCESSOR 

RETURN  CODES 

RW 

-  REPORT  WRITER 

DEFINITIONS 

NTM 

-  NTM  INTERFACE 

INCLUDE  FILE 

CTLCHR 

-  CONTROL  CHARACTERS 

ROUTINES  CALLED: 


STRCHR 

STRCPY 


CALLED  DIRECTLY  BY: 


MAKES 

SELGEN 

SAVEES 

SELWS 

INSWS 

GETTBL 


MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 

SELECT  GENERATE 

SAVE  ES  INFORMATION 

SELECT  WORKING  STORAGE  SECTION 

INSERT  WORKING  STORAGE  SECTION 

GET  A  TABLE  NAME 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


OPNFIL 

GENERATE  OPEN  FILE  SECTION 
C 

SUBROUTINE 
VOID  {) 

NDMLGEN 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


SPTR  =  SELECT  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

NTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 

FPRINTF 

OPNFIL  -  GENERATE  OPEN  FILE  SECTION 


CALLED  DIRECTLY  BY: 


SELGEN  -  SELECT  GENERATE 

PROCGEN  -  PROCEDURE  DIVISION  GENERATE 

OPNFIL  -  GENERATE  OPEN  FILE  SECTION 


USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE; 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


PEMAP 

THE  PRESENTATION  SCHEMA  AND  THE  EXTERNAL 
SCHEMA  AND  MAPPING 
C 

SUBROUTINE 
VOID  {) 

PEMAP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION; 


SYNOPSIS 

PEMAP (LANG,  STRl , STR2 , FPTR ,  DPTR) 
INT  LANG; 

CHAR  *STR1; 

CHAR  *STR2; 

FIELD  *FPTR; 

STRUCT  DTYPE  *DPTR; 


DESCRIPTION 

GENERATES  THE  CODE  TO  TRANSFORM  AN  PRESENTATION  SCHEMA 

DATA  ITEM  INTO 

A  EXTERNAL  SCHEMA  ITEM.  THIS  IS  DONE  ON  A  PER  ITEM  BASIS 

AND  THE 

SOURCE  AND  DESTINATION  STRINGS  OF  CODE  (STRl,  STR2)  ARE 

PASSED  IN  SO 

THE  RESULTING  CODE  MAY  USE  THE  CORRECT  VARIABLES. 


ARGUMENTS : 


LANG  = 
STRl  = 
STR2  = 
FPTR  = 
DPTR  = 


INT 

CHAR  * 

CHAR  * 
FIELD 

CDMDTYPE  * 


INCLUDE  FILES; 


STDTYP 

STDIO 

FPD 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  >■•*** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 
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ROUTINES  CALLED: 
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CPF  -  C  PF 

COBPE  -  COBOL  PE 


CALLED  DIRECTLY  BY: 


SELGEN  -  SELECT  GENERATE 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE; 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


PROCGEN 

PROCEDURE  DIVISION  GENERATE 
C 

FUNCTION 
INT  0 
NDMLGEN 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS: 


LANG  =  INT 

TYPE  =  CHAR 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

NTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


MAP 

USING 

OPNFIL 

NDMLLAB 

CLSFIL 

INSMAP 

SELMAP 

INDENT 

FPRINTF 

PSESMAP 


GENERATE  USING  SECTION 
GENERATE  OPEN  FILE  SECTION 
GENERATE  LABELS 
CLOSE  FILES 

MAP  SELECTED  DATA  TO  OUTPUT  RECORD 
INDENT  A  LINE  OF  GENERATED  CODE 


CALLED  DIRECTLY  BY: 


STDCODE  -  STANDARD  COBOL  CODE 
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USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


ARGUMENTS : 


PSSTRC/COBSUB 
COBOL  SUBSTITUTE 
C 

SUBROUTINE 
VOID  0 
PSSTRC 

.C 

UI 

RW 

RW/AP 


DP  -  FIELD  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 


★  ★  *  * 


ROUTINES  CALLED: 


BLEN 

FPRINTF 

PSSTRC/ INDENT  -  INDENT 


CALLED  DIRECTLY  BY: 


MAKPS  -  MAKES  THE  PRESENTATION  SCHEMA  RECORD  STRUCTURE 

MAKWH  -  MAKE  WHERE 

MAKINS  -  MAKE  INSERT 


USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME; 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

EUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


PSSTRC/CSUB 
C  SUBSTITUTE 
C 

SUBROUTINE 
VOID  0 
PSSTRC 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


DP  =  FIELD  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


BLEN 

FPRINTF 

PSSTRC/INDENT  -  INDENT 


CALLED  DIRECTLY  BY: 


MAKPS  -  MAKES  THE  PRESENTATION  SCHEMA  RECORD  STRUCTURE 

MAKWH  -  MAKE  WHERE 

MAKINS  -  MAKE  INSERT 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME : 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


PSSTRC/ INDENT 

INDENT 

C 

SUBROUTINE 
VOID  0 
PSSTRC 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS : 


M  =  INT 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


PUTC 


CALLED  DIRECTLY  BY: 


PSSTRC/CSU  -  C  SUBSTITUTE 
PSSTRC/COBSUB  -  COBOL  SUBSTITUTE 
MAKWH  -  MAKE  WHERE 

MAKINS  -  MAKE  INSERT 


USED  IN  MAIN  PROGP.AM(S): 

GKP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 
READDB(FP) 

FIELD  *FP; 

INPUTS/OUTPUTS : 

NONE 

INPUTS: 

FP  -  FIELD  POINTER 

OUTPUTS : 

NONE 

DESCRIPTION 

TRAVERSES  THE  LIST  OF  SELECTS  LOOKING  FOR  ONES  THAT  TARGET 

TO  ITEMS 

ON  THE  FORM  INDICATED  BY  THE  INPUT  PRARMETER.  WHEN  ONE  IS 

FOUND  IT 

CALLS  DBFREAD  TO  READ  A  DATA  RECORD  AND  CHECK  FOR  CHANGE 

CONDITIONS. 


READDB 

READ  DATA  BASE 
C 

FUNCTION 
INT  0 
GRP 

.C 

UI 

RW 

RW/AP 


ARGUMENTS : 


FP  =  FIELD  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

rPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 
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HASLOWER  -  HAS  A  LOWER  FORM  WHICH  READS  THE  SAME  DATA 

RECORD? 

DBFREAD  -  GENERATE  DATA  BASE  FREAD 


CALLED  DIRECTLY  BY: 


BSCODE  -  BUILD  SUBROUTINE  CODE 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERATE  aPPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

RSETNDP(FP,  DP) 

FIELD  *FP,  *DP; 

INPUTS/OUTPUTS: 

NONE 

INPUTS: 

FP  -  PARENT  FORM  OF  DP  (HELP  IN  RECURSION) . 

DP  -  FIELD  THAT  MIGHT  HAVE  NODUP  OPTION. 

OUTPUTS: 

NONE 

DESCRIPTION 

TRAVERSES  THE  FORM  HIERARCHY  LOOKING  FOR  ITEMS  UNDER  FP 

WHICH  HAVE 

THE  NODUP  OPTION.  WHEN  IT  FINDS  ONE  IT  GENERATES  CODE  TO 

COPY  THE 

NODUP%D  VALUE  TO  THE  FORM  FIELD. 

ARGUMENTS : 


RSETNDP 

RESET  NODUPLICATE  FIELDS  TO  VALUE  OF 

NODUP%D 

C 

FUNCTION 
INT  0 
GRP 

.C 

UI 

RW 

RW/AP 


FP  =  FIELD  * 

DP  =  FIELD  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 
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ROUTIf ES  CALLED: 


RSETNDP 

MAKQR 

SPRINTF 

STRLEN 

GEN 

HAS DATA 


RESET  NODUPLICATE  FIELDS  TO  VALUE  OF  NODUP%D 
MAKE  QUALIFIED  REFERENCE 


GENERATE  A  LINE  OF  CODE 

DETERMINE  IF  THERE  ARE  ANY  SELECT  STATEMENTS 


CALLED  DIRECTLY  BY: 


BSCODE  -  BUILD  SUBROUTINE  CODE 

RSETNDP  -  RESET  NODUPLICATE  FIELDS  TO  VALUE  OF  NODUPID 


USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


DESCRIPTION: 


ARGUMENTS: 

FP  = 

DP  = 

FIELD  * 

FIELD  * 

INCLUDE  FILES 

1 

STDTYP 

FPD 

FPCODE 

RW 

-  STANDARD  TYPE  DEFINITIONS 

-  FORM  PROCESSOR  DATA 

-  FORM  PROCESSOR  RETURN  CODES 

-  REPORT  WRITER  DEFINITIONS 

ROUTINES  CALLED: 

RSETSTAT 

MAKQR 

-  RESET  STATISTIC 

-  MAKE  QUALIFIED  REFERENCE 

SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 


RSETSTAT 

RESET  STATISTIC 

C 

FUNCTION 
INT  0 
RWSP 

.C 

UI 

RW 

RW/AP 


CALLED  DIRECTLY  BY: 


FRMPDAT  -  FORM  PDATA 

RSETSTAT  -  RESET  STATISTIC 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 
HOST: 


RWEXPD 

REPORT  WRITER  EXPAND  ARRAYS 
C 

FUNCTION 
CHAR  *  ( ) 

RWSP 

•  C 


SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 


DESCRIPTION: 


SYNOPSIS 

CHAR  *RWEXPD(FDP,  USELST) 
FIELD  *FDP; 

FIELD  **USELST; 


INPUTS  : 

FIELD  *FDP;  **  THE  FORM  YOU  WISH  EXPANDED  ** 
FIELD  **USELST;  **  WHERE  TO  LOOK  FOR  EXPANDING 
SUBFORMS 


DESCRIPTION 

THIS  GUY  IS  RESPOSIBLE  FOR  EXPANDING  AN  ARRAY  WHICH  WAS 

PARTIALLY 

CONSTRUCTED  BY  FLAN.  IT  TAKES  A  POINTER  TO  THE  FORM  TO 

BE  EXPANDED 

AND  A  POINTER  TO  THE  POINTER  TO  THE  LIST  FROM  WHICH 

SUBFORMS  MAY  BE 

TAKEN.  IF  A  SUBFORM  IS  NOT  FOUND  THE  FIELD'S  DISPLAY 

ATTRIBUTE  IS 

SET  TO  INPUT.  THE  CASE  WHERE  BOTH  A  FIELD  AND  THE 

SUBFORM  HAVE 

PROMPTS  IS  RESOLVED  BE  CREATING  A  SPECIAL  FIELD  TO  HOLD 

THE  FIELD'S 

PROMPTS.  USELST  MUST  BE  A  POINTER  TO  A  POINTER  BECAUSE 

DELFLD  IS  USED 

AND  THAT'S  WHAT  IT  NEEDS. 

ARGUMENTS : 


FDP  =  FIELD  * 

USELST  =  FIELD  ** 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  RETURN  CODES 
REPORT  WRITER  DEFINITIONS 


STDTYP 

FPD 

FPCODE 

RW 
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ROUTINES  CALLED: 


COPFLD 

ABS 

FNDATT  -  FIND  ATTRIBUTE 

STRASN 

RWSP/FIXFRM  -  FIX  UP  A  FORM 


CALLED  DIRECTLY  BY: 


RWSP/FIXFR  -  FIX  UP  A  FORM 

RWOPN  -  REPORT  WRITER  OPEN  FORMS 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


RWOPN 

REPORT  WRITER  OPEN  FORMS 
C 

SUBROUTINE 
VOID  0 
RWSP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

VOID  RWOPN 0 


DESCRIPTION 


CREATES  AN  "OPEN  LIST"  OF  FORMS,  FROM  THE  STRUCTURES 

CREATED  BY  FLAN 

SUBFORMS  ARE  COPIED  IN  PLACE  AND  ARRAYS  ARE  EXPANDED  TO 

THEIR  FULL 


SIZE. 


INCLUDE  FILES: 


STDTYP 

FPD 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  RETURN  CODES 
REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


RWEXPD  -  REPORT  WRITER  EXPAND  ARRAYS 

MLPFRM  -  MAKE  A  LIST  OF  PRESENTED  FORMS 

WINRSV  -  WINDOW  RESOLVE 

FLDRSV  -  FIELD  RESOLVE 

TRGRSV  -  TRIGGER  RESOLVE 


CALLED  DIRECTLY  BY: 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME:  RWSP/FIXFRM 

PURPOSE:  FIX  UP  A  FORM 

LANGUAGE :  C 

MODULE  TYPE:  FUNCTION 

FUNCTION  TYPE:  CHAR  *  () 

SOURCE  FILE:  RWSP 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 

DESCRIPTION: 


SYNOPSIS 

CHAR  *FIXFRM(DP,  USELST) 

FIELD  *DP; 

FIELD  **USELST; 

INPUTS: 

DP  -  DUMMY  FORM  FIELD  TO  BE  FIXED  UP. 

USELST  -  WHERE  TO  LOOK  FOR  THE  SUBFORM  TO  COPY. 

DESCRIPTION 

FIXES  A  SUBFORM  BY  LOCATING  IT  AND  ATTACHING  IT  IN  PLACE 

AND 

EXPANDING  IT  IF  REQUIRED. 

ARGUMENTS: 


DP  =  FIELD  * 

USELST  =  FIELD  ** 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


RWEXPD  -  REPORT  WRITER  EXPAND  ARRAYS 

COPFLD 

FNDATT  -  FIND  ATTRIBUTE 

ST ROMP 
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CALLED  DIRECTLY  BY: 
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RWEXPD  -  REPORT  WRITER  EXPAND  ARRAYS 

USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAT^E  ; 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SAVEES 

SAVE  ES  INFORMATION 
C 

FUNCTION 
INT  () 

NDMLGEN 

.C 

UI 

RW 

RW/AP 


ARGUMENTS : 


ITMNAM  = 
DPTR  = 

REC  CNT  = 


CHAR  [CDMCOLNAMLEN  +1 
CDMDTYPE  * 

INT 


] 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

NTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INC1.UDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


NULBLK  -  BLANK  FILL  A  STRING 

STRNCMP 

STRLEN 

ESCPY 

ATOI 


CALLED  DIRECTLY  BY: 


SELWS  -  SELECT  WORKING  STORAGE  SECTION 

INSWS  -  INSERT  WORKING  STORAGE  SECTION 


L’SED  IN  MAIN  PROGRAM  (S)  : 


GRP/MAIN  -  GENERATE  APPLICATION /REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SELECT 

GENERATE  SELECT  CODE 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

.C 

UI 

RW 

RW/AP 


ARGUMENTS: 


LANG  =  INT 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

NTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


SELGEN  -  SELECT  GENERATE 


CALLED  DIRECTLY  BY: 


STDCODE  -  STANDARD  COBOL  CODE 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-254 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAJIE :  SELGEN 

PURPOSE:  SELECT  GENERATE 

LANGUAGE:  C 

MODULE  TYPE:  SUBROUTINE 

FUNCTION  TYPE:  VOID  () 

SOURCE  FILE:  NDMLGEN 

SOURCE  FILE  TYPE:  .C 

HOST: 

SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 

DESCRIPTION: 


ARGUMENTS : 


LANG  =  INT 

PPTR  =  SELECT  * 

SPTR  =  SELECT  * 

TOPSEL  =  SELECT  * 


INCLUDE  riLES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

FPPARM  -  FORM  PROCESSOR  PARAMETERS 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 

RW  -  REPORT  WRITER  DEFINITIONS 

NTM  -  NTM  INTERFACE  INCLUDE  FILE 

CTLCHR  -  CONTROL  CHARACTERS 


ROUTINES  CALLED: 


SELGEN  -  SELECT  GENERATE 

NULBLK  -  BLANK  FILL  A  STRING 

STRCPY 

PEMAP  -  THE  PRESENTATION  SCHEMA  AND  THE  EXTERNAL  SCHEMA 

AND  MAPPING 

SPRINTF 

DASH  -  WRITE  DASH 

GETTBL  -  GET  A  TABLE  NAME 

GETCOL  -  GET  TH^'  COLUMN  NAME  OF  A  TABLE.  COLUMN  OR  COLUMN 

STRING 

OPNFIL  -  GENERATE  OPEN  FILE  SECTION 

FPRINTF 

INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 
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CALLED  DIRECTLY  BY: 
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SELGEN  -  SELECT  GENERATE 

SELECT  -  GENERATE  SELECT  CODE 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME ; 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


SELLEN 

COMPUTE  LENGTH  OF  SELECT  PS  RECORD 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

.  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


ARGUMENTS: 


SPTR 


SELECT  * 


i:iCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

KTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


BLEN 


CALLED  DIRECTLY  BY: 


FD  -  FD  SECTION  DECLARATIONS 


USED  IN  MAIN  PROGRAM'S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


ARGUMENTS: 


LANG  =  INT 

SPTR  =  SELECT  * 


INCLUDE  FILES: 


STDTYP 

-  STANDARD  TYPE 

DEFINITIONS 

STDIO 

-  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD 

-  FORM  PROCESSOR 

DATA 

FPPARM 

-  FORM  PROCESSOR 

PARAMETERS 

FPCODE 

-  FORM  PROCESSOR 

RETURN  CODES 

RW 

-  REPORT  WRITER 

DEFINITIONS 

NTM 

-  NTM  INTERFACE 

INCLUDE  FILE 

CTLCHR 

-  CONTROL  CHARACTERS 

ROUTINES 

CALLED: 

SELMAP 

MAP  SELECTED  DATA  TO  OUTPUT  RECORD 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

.C 

UI 

RW 

RW/AP 


ESPSMAP 

SELMAP 


THE  EXTERNAL  SCHEMA  AND  PRESENTATION  SCHEMA 
MAPPING 

MAP  SELECTED  DATA  TO  OUTPUT  RECORD 


CALLED  DIRECTLY  BY: 


PROCGEN  -  PROCEDURE  DIVISION  GENERATE 
SELMAP  -  MAP  SELECTED  DATA  TO  OUTPUT  RECORD 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE; 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 

HOST: 

SUBSYSTEM: 

SUBDIPECTORY: 

DOCUMENTATION  GROUP:  RW/AP 

DESCRIPTION: 


SELOPN 
SELECT  OPEN 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 


SYNOPSIS 
SELOPN  (SP) 

SELECT  *SP; 

INPUTS : 

SP  -  POINTER  TO  SELECT  TO  HAVE  ITS  DATA  FILE  OPENED. 
DESCRIPTION 

GENERATES  CODE  TO  OPEN  THE  DATA  FILE  ASSOCIATED  WITH  THIS 

SELECT 

ACTION. 


ARGUMENTS 
SP  = 


SELECT  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

FPD  -  FORM  PROCESSOR  DATA 

RW  -  REPORT  WRITER  DEFINITIONS 


ROUTINES  CALLED: 


SPRINTF 

GEN  -  GENERATE  A  LINE  OF  CODE 

DBFREAD  -  GENERATE  DATA  BASE  FREAD 

SELOPN  -  SELECT  OPEN 


CALLED  DIRECTLY  BY: 


GENAQ  -  GENERATE  ACTION  QUERY  (SELECT) 

;IEL0PN  -  SELECT  OPEN 
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USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP; 


SELRSV 

SELECT  RESOLVE 
C 

SUBROUTINE 
VOID  0 
RWSP 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

VOID  SELRSV (SELPTR,  TRGPTR,  ACTPTR) 

SELECT  *SELPTR; 

TRGPTR  *TRGPTR; 

ACTPTR  *ACTPTR; 

INPUTS: 

SELPTR  -  SELECT  FROM  WHICH  TO  LOOK  FOR  PATHS. 

TRGPTR  -  CONDITION  THIS  SELECT  IS  ASSOCIATED  WITH. 

ACTPTR  -  ACTION  THIS  SELECT  IS  ASSOCIATED  WITH. 

DESCRIPTION 

RESOLVES  ALL  QUALIFIED  NAMES  INTO  FIELD  POINTERS  FOR  ALL 

NAMES 

WHICH  ARE  ROOTED  IN  SELECT  (SELECT,  VARIABLE  LIST,  WHERE 

LIST)  . 


ARGUMENTS 


SELPTR 

TRGPTR 

ACTPTR 


SELECT  * 
TRGLST  * 
ACTLST  * 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  RETURN  CODES 
REPORT  WRITER  DEFINITIONS 


STDTYP 

FPD 

FPCODE 

RW 


RC'L'TINFS  CALLED: 


SELRSV  -  SELECT  RESOLVE 

'■UPTH  -  UNIVERSAL  QUALIFIER  PATH 

FRROR  -  ISSUE  ERROR  MESSAGE 

s-ETPLH  -  GET  PATH 
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CALLED  DIRECTLY  BY: 


SELRSV  -  SELECT  RESOLVE 

ACTRSV  -  ACTION  RESOLVE 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  T^PE. 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


SELWHR 

SELECT  WHERE 
C 

FUNCTION 
INT  ( ) 

GENACT 

.  C 

UI 

RW 

RW/AP 


DESCRIPTION : 


SYNOPSIS 

SELWHR(SP,  TP,  AP) 

SELECT  *SP; 

TRGLST  *TP; 

ACTLST  *AP; 

INPUTS : 

SP  -  POINTER  TO  SELECT  ACTION  (NEEDED  SINCE  SELECTS  CAN  BE 

NESTED) . 

TP  -  CONDITION  ASSOCIATED  WITH  THIS  ACTION. 

AP  -  THIS  ACTION. 

DESCRIPTION 

GENERATES  CODE  TO  COPY  DATA  FROM  A  FORM  STRUCTURE  TO  THE 

WHERE  STRUCTURE 

FOR  THOSE  SELECTS  WHICH  HAVE  A  QUALIFIED  NAME  IN  THE  WHERE 

CIAlUSE. 


ARGUMENTS : 


SP  - 
TP  - 
AP  = 


SELECT  * 
TRGLST  * 
ACTLST  * 


INCLUDE  FILES: 


r'TDTY  F 
I  PD 
Hv; 


STANDARD  TYPE  DEFltJITIONS 
FORM  PROCESSOR  DATA 
REPORT  WRITER  DEFINITIONS 


i-''STlNFS  CALLED: 


:U  R1 N  I  F 
MAKQP 
UN' 

Sf  T.WHP 


MAKE  QUALIFIED  REFFREt-'CE 
GENEivATE  A  LINE  OF  CODE 
SELECT  WHERE 


30 


PS  620344502 
September  1990 


CALLED  DIRECTLY  BY: 


GENAQ  -  GENERATE  ACTION  QUERY  (SELECT) 

SELWHR  -  SELECT  WHERE 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


^JAME  : 

PURPOSE: 

LArJGUAGE: 

MODULE  TYPE: 

FUN'CTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SURSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP : 


SELWS 

SELECT  WORKING  STORAGE  SECTION 
C 

FUNCTION 
INT  0 
NDMLGEN 

.  C 

UI 

RW 

RW/AP 


DESCRIPTION : 


ARGUMENT'S  : 


SPTR  =  SELECT  * 

RANG  -  INT 


INCLUDE  FILES: 


STDTYP 
ST'DIO 
F  PD 

FPPARM 

FPCODE 

Ru; 

N'lM 

CTLCHH 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


HOC  riNES  CALLED: 


MAKiO 
fiULBLK 
S i POPY 


I UDENT 
f-'PP  INT F 
MA KWHES 
Si  i.v;g 
;;akes 

U.  L  '.un 

S  I  ib: 

S  :  PSMF" 


MAKES  THE  PRESENTATION  SCHEMA  RECORD  STRUCTURE 
BLANK  FILL  A  STRING 

'WRITE  DASH 

INDENT  A  LINE  OF  GENERATED  CODE 

MAKE  THE  WHERE  CIAUSE  EX'IFRNAL  SCHEMA  VARIABLES 
SELECr  WORKING  STORAGE  SECTION 
MAKES  THE  EXTERNAL  SCHEMA  RECORD  STRUCTURE 
GET  THE  COLUMN  NAME  OF  A  TABLE .  COLUMN  OR  COLUM!, 
S'l  RING 

GET  A  TABLE  NAME 
SAVE  ES  INFORMATION 


CALLED  DIRFCTI.Y  BV : 


PS  620344502 
30  September  1990 


DATAGEN  -  DATA  DIVISION  GENERATE 

SELWS  -  SELECT  WORKING  STORAGE  SECTION 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME  : 

PURPOSE; 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE; 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


SETNDP 

SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY 
ARE  DUPLICATED 
C 

FUNCTION 
INT  0 
GRP 

.  C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

SETNDP(FP,  DP) 

FIELD  *FP,  *DP; 


INPUTS/OUTPUTS: 

NONE 


INPUTS ; 

FP  -  PARENT  FORM  OF  DP  (HELP  IN  RECURSION) . 
DP  -  FIELD  THAT  MIGHT  HAVE  NODUP  OPTION. 


OUTPUTS : 
NONE 


DESCRIPIION 


TRAVERSES 


THE  NODUP 


DUPLICATE 


VALUES . 


THE  FORM  HIERARCHY  LOOKING  FOR  ITEMS  UNDER  FP 
WHICH  HAVE 

OPTION.  WHEN  IT  FINDS  ONE  IT  GENERATES  CODE  TO 
CHECK  FOR 

VALUES  AND  BLANKS  THE  FORM  FORM  IF  THERE  ARE 
DUPLICATE 


ARGUMENTS : 


IT  -  FIELD  * 

rU'  FIEI.D  * 


INCI.UTE  FIIFS: 


U  i  D  i  V  T 
I  I  u 
r  T 1 , 

I  T!)  [  r;  I 


:jrA.I.DARD  I  7 TE  DEI  INI  TION'S 

****  {'Urpose  not  found  by  sir: tier  **** 

lORH  PROCESSOR  DATA 
I  PD  INITIALIZATION 
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FPPARM  -  FORM  PROCESSOR  PARAMETERS 

RW  -  REPORT  WRITER  DEFINITIONS 

NTM  -  NTM  INTERFACE  INCLUDE  FILE 


ROUTINES  CALLED: 


SETNDP  -  SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY  ARE 

DUPLICATED 

MAKQR  -  MAKE  QUALIFIED  REFERENCE 

SPRINTF 

STRLEN 

GEN  -  GENERATE  A  LINE  OF  CODE 

HASDATA  -  DETERMINE  IF  THERE  ARE  ANY  SELECT  STATEMENTS 


CALLED  DIRECTLY  BY: 


BSCODE  -  BUILD  SUBROUTINE  CODE 

SETNDP  -  SET  NODUPLICATE  FIELDS  TO  BLANK  IF  THEY  ARE 

DUPLICATED 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERA.TE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

STATRSV(STATPTR) 

STATLST  *STATPTR; 

INPUTS: 

STATPTR  -  STATISTIC  LIST  FROM  WHICH  TO  LOOK  FOR  PATHS. 
DESCRIPTION 

RESOLVES  ALL  QUALIFIED  NAMES  INTO  FIELD  POINTERS  FOR  ALL 

NAMES 

WHICH  ARE  ROOTED  IN  STATLST  (STATISTIC  LIST) . 

ARGUMENTS : 


STATPTR  =  STATLST  * 


STATRSV 

STATISTIC  RESOLVE 
C 

FUNCTION 
INT  0 
RWSP 

.  C 

UI 

RW 

RW/AP 


ir.’CLUDF  FILES: 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  RETURN  CODES 
REPORT  WRITER  DEFINITIONS 


STDTYP 

FPU 

FPCODE 

RW 


PvUriUES  CALLED: 


GETPTH  -  GET  PATH 

ERROR  -  ISSUE  ERROR  MESSAGE 


G'AI.I.ED  DIRECTLY  BY: 


FLDRSV  -  FIELD  RESOLVE 
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USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME; 

PURPOSE: 

LANGUAGE; 

MODULE  TYPE: 

FUNCTION  TYPE; 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


STDCODE 

STANDARD  COBOL  CODE 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

•  C 

UI 

RW 

RW/AP 


GENERATE  THE  NECESSARY  DIVISIONS  FOR  COBOL  AND  THE  DATA 
STRUCTURES  NECESSARY  FOR  NTM  PROCESSING. 

FOR  A  COBOL  PROGRAM  TO  DO  JUST  NDML  AND  WRITE  DATA  TO  FILES 
MUST  CONSTRUCT  FILE  SECTION  CORRECTLY. 

FOR  A  C  PROGRAM  WOULD  BE  DECLARING  ALL  NTM  VARIABLES  AS 
EXTERNAL  TO  THE  C  GENERATED  PROCEDURE, 

ARGUMENTS : 


LA.NG  -  I  NT 

APNAME  =  CHAR  * 

TYPE  =  CHAR 


INCLUDE  FILES: 


SI DTYP 

S'lDIO 

FPD 

FPPARM 
FPCODF 
R'.v 
;;  IM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


Fr.TGEN 
OFI FCT 
S  i  'R  I  NTF 
PROCGEN 
:■  PH  I  NTF 
PA'I  AGEN 
OTHiT’C 
I NSERT 


END  GERNEPT.TE 
GENERATE  SELECT  CODE 

PROCEDURE  DIVISION  GENERA  IE 

DATA  DIVISION  GENERATE 

IN’SERi  PR.OCEDURE 
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CALLED  DIRECTLY  BY: 

NDMLGEN  -  NDML  COBOL  APPLICATION  GENERATOR 
USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

TRGRSV (TRGPTR) 

TRGLST  *TRGPTR; 

INPUTS: 

TRGPTR  -  CONDITION  LIST  FROM  WHICH  TO  LOOK  FOR  PATHS. 
DESCRIPTION 

RESOLVES  ALL  QUALIFIED  NAMES  INTO  FIELD  POINTERS  FOR  ALL 

NAMES 

WHICH  ARE  ROOTED  IN  TRGLST  (CONDITION  LIST) . 

ARGUMENTS : 


TRGPTR  =  TRGLST  * 


TRGRSV 

TRIGGER  RESOLVE 
C 

FUNCTION 
INT  0 
RWSP 

•  C 

UI 

RW 

RW/AP 


INCLUDE  FILES: 


STDTYP 

FPD 

FPCODE 

RW 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
lORM  PROCESSOR  RETURN  CODES 
REPORT  WRITER  DEFINITIONS 


ROUTINES  CAT, LED: 


GKIPTH  -  GET  PATH 

ERROR  -  ISSUE  ERROR  MESSAGE 

ACTRSV  -  ACTION  RESOLVii 

UOPTH  -  UNIVERSAL  QUALIFIER  PATH 


EAI  I  FT)  DIHECILY  BY: 


i- WOT  -  REPORT  WRITER  OPEN  FORMS 


USED  IN  MAIN  PROGRAM(S): 


GRP/MAIN 


PS  620344 
30  September  1 


-  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME : 
pnc>posE : 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY : 
DOCUMENTATION  GROUP: 


UQFOR 

UNIVERSAL  QUALIFIER  FOR  LOOP 
C 

FUNCTION 
INT  0 
GENACT 

.C 

UI 

RW 

RW/AP 


DESCRIPTION: 


SYNOPSIS 

■’OFOR(FLDP,  TYPE) 
FLDLST  *FLDP; 
CHAR  TYPE; 


INPUTS : 

FLOP  -  POINTER  TO  LIST  OF  FIELDS  WHICH  REQUIRE  UNIVERSAL 

QUALIFICATION. 

TYPE  -  'T'  FOR  CONDITIONAL  INDEX  (TINDX%D)  'A'  FOR  ACTION 

(AINDXID) . 


DESCRIPTION 

GENERATES  THE  FOR  LOOP  FOR  UNIVERSAL  QUALIFICATION. 
ARGUMENTS : 

FLOP  =  FLDLST  * 

TYPE  =  CHAR 


If.'CLUDL  FILES: 


STDT'YP 

FPD 

Rv; 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
REPORT  WRITER  DEFINITIONS 


k'jUTniES  CALLED: 


SPRINTF 

GEiJ  -  GENERATE  A  LINE  OF  CODE 


CALLED  DIRECTLY  BY; 


CErJTRG  -  GENERATE  TRIGGERS 

GLNAL  -  GENERATE  ACTION  LIST 
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USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 
FUNCTION  TYPE: 
SOURCE  FILE: 
SOURCE  FILE  TYPE: 


UQPTH 

UNIVERSAL  QUALIFIER  PATH 
C 

FUNCTION 
CHAR  *  0 
RWSP 

.C 


HOST: 


SUBSYSTEM:  UI 

SUBDIRECTORY:  RW 

DOCUMENTATION  GROUP:  RW/AP 


DESCRIPTION: 


SYNOPSIS 

CHAR  *UQPTH(PATH,  DP,  TFLDPP,  AFLDPP) 

CHAR  PATH [ ] ; 

FIELD  *DP; 

FLDLST  **TFLDPP,  **AFLDPP; 

INPUTS/OUTPUTS: 

TFLDPP  -  POINTER  TO  POINTER  OF  CONDITION  INDEX  FIELDS. 
AFLDPP  -  POINTER  TO  POINTER  OF  ACTION  INDEX  FIELDS. 

INPUTS: 

PATH  -  PATH  WITH  UNIVERSAL  QUALIFIERS  IN  IT. 

DP  -  FIRST  INSTANCE  OF  PATH. 

DESCRIPTION 


MAKES  A  LIST  OF  FIELDS  WHICH  REQUIRE  UNIVERSAL 

QUALIFICATION  FOR 
A  CONDITION  AND  ACTION. 


ARGUMENTS : 


PATH  = 
DP  = 
TFLDPP 
AFLDPP 


CHAR  [  ] 
FIELD  * 

FLDLST  ** 
FLDLST  ** 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  RETURN  CODES 
REPORT  WRITER  DEFINITIONS 


STDTYP 

FPD 

FPCODE 

RW 


ROUTINES  CALLED: 


M A  LLOC 
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PTHPTR 

STRCHR 

STRCPY 


CALLED  DIRECTLY  BY: 


INSRSV  -  INSERT  RESOLVE 

SELRSV  -  SELECT  RESOLVE 

TRGRSV  -  TRIGGER  RESOLVE 

ACTRSV  -  ACTION  RESOLVE 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


ARGUMENTS : 


USING 

GENERATE  USING  SECTION 
C 

SUBROUTINE 
VOID  0 
NDMLGEN 

•  C 

UI 

RW 

RW/AP 


SPTR  =  SELECT  * 


INCLUDE  FILES; 


STDTYP 

STDIO 

FPD 

FPPARM 

FPCODE 

RW 

NTM 

CTLCHR 


STANDARD  TYPE  DEFINITIONS 

***-  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FC  1  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

FORM  PROCESSOR  RETURN  CODES 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 

CONTROL  CHARACTERS 


ROUTINES  CALLED: 


INDENT  -  INDENT  A  LINE  OF  GENERATED  CODE 

FPRINTF 


CALLED  DIRECTLY  BY: 


PROCGEN  -  PROCEDURE  DIVISION  GENERATE 
USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-279 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME ; 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 
VISITA(DP) 

FIELD  *DP; 

INPUTS/OUTPUTS: 

NONE 

INPUTS: 

(DP)  -  FIELD  POINTER 

OUTPUTS : 

NONE 

DESCRIPTION 

VISIT  AN  ARRAY  BY  GENERATING  A  LOOP  TO  GO  THRU  THE 

ELEMENTS  IN  THE  ARRAY. 

CHECK  FOR  GROUP  SEPERATORS/END  OF  FILE,  OVERFLOW 

CONDITIONS  AND  CALL  THE 
PROCEDURE  WHICH  IMPLEMENTS  THE  SUBFORM. 

ARGUMENTS : 


VISITA 

VISIT  ARRAYS  ON  THIS  FORM 
C 

FUNCTION 
INT  0 
GRP 

.C 

UI 

RW 

RW/AP 


DP  =  FIELD  * 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPDINI 

FPPARM 

RW 

NTM 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FPD  INITIALIZATION 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

NTM  INTERFACE  INCLUDE  FILE 
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ROUTINES  CALLED: 


VISITA  -  VISIT  ARRAYS  ON  THIS  FORM 

HASDATA  -  DETERMINE  IF  THERE  ARE  ANY  SELECT  STATEMENTS 

GEN  -  GENERATE  A  LINE  OF  CODE 

MAKQR  -  MAKE  QUALIFIED  REFERENCE 

HASITEM  -  THIS  ROUTINE  DETERMINES  IF  THERE  IS  AN  ITEM 

WITHIN 

CHKGRP  -  CHECK  FOR  GROUP  SEPERATORS  OR  END  OF  FILE 

SPRINTF 

STRLEN 


CALLED  DIRECTLY  BY: 


BSCODE  -  BUILD  SUBROUTINE  CODE 

VISITA  -  VISIT  ARRAYS  ON  THIS  FORM 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

VOID  WARNING (S, 
CHAR  *S,  *A, 


WARNING 

ISSUE  WARNING  MESSAGE 
C 

SUBROUTINE 
VOID  0 
FLUIERR 

.C 

UI 

FE 

FDFE/FLAN 


A,  B,  C,  D,  E,  F) 
*B,  *C,  *D,  *E,  *F; 


DESCRIPTION 

PRINTS  A  WARNING  MESSAGE  ON  STDERR 


ARGUMENTS : 


S  =  CHAR  * 
A  =  CHAR  * 
B  =  CHAR  * 
C  =  CHAR  * 
D  =  CHAR  * 
E  =  CHAR  * 
F  =  CHAR  * 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 


ROUTINES  CALLED: 


PMSGLS 

STRLEN 

SPRINTF 


CALLED  DIRECTLY  BY: 


CHKFRM 
YYLEX 
YYPARSE 
GEN  AT 


CHECK  FORM 

LEXICAL  ANALYZER  FOR  FLAN 
FLAN  PARSER 

GENERATE  ACTION  SIGNAL 
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USED  IN  MAIN  PROGRAM (S) : 
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GRP/MAIN 


-  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 
WINRSV( ) 

DESCRIPTION 

ALL  FORMS  WHICH  ARE  PRESENTED  IN  WINDOWS  ARE  ADDED  TO 

THOSE  WINDOWS 

SO  QUALIFIED  NAMES  MAY  BE  RESOLVED  INTO  POINTERS. 


WINRSV 

WINDOW  RESOLVE 
C 

FUNCTION 
INT  0 
RWSP 

.C 

UI 

RW 

RW/AP 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  RETURN  CODES 
REPORT  WRITER  DEFINITIONS 


STDTYP 

FPD 

FPCODE 

RW 


ROUTINES  CALLED: 


MALLOC 

GETPTH  -  GET  PATH 

FNDFRM  -  FIND  FORM 

COPFLD 
FREE 


CALLED  DIRECTLY  BY: 


RWOPN  -  REPORT  WRITER  OPEN  FORMS 


USED  IN  MAIN  PROGRAM{S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


SYNOPSIS 

CHAR  *WRTEXP(EP) 

ENODE  *EP; 

INPUTS : 

EP  -  EXPRESSION  TO  WRITE 
OUTPUTS : 

RETURNS  A  POINTER  TO  THE  WRITTEN  EXPRESSION  OR  NULL 
FOR  ERRORS 


WRTEXP 

WRITE  EXPRESSION 
C 

FUNCTION 
CHAR  *  ( ) 

FLANSP 

•  C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION 

RETURNS  A  POINTER  TO  THE  CHARACTER  STRING  REPRESENTING 

THE  GIVEN 

EXPRESSION,  OR  NULL  IF  AN  ERROR  IS  DETECTED. 

ARGUMENTS : 


EP  =  ENODE  * 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

REPORT  WRITER  DEFINITIONS 

FORM  PROCESSOR  RETURN  CODES 


STDTYP 

STDIO 

FPD 

RW 

FPCODE 


ROUTINES  CALLED: 


FREE 

WRTEXP 

MFMCPY 

MYALLOC 

STRLEN 

SPRINTF 


WRITE  EXPRESSION 
MY  MALLOC 
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CALLED  DIRECTLY  BY: 


CHKFLD  -  CHECK  FIELD 

WRTEXP  -  WRITE  EXPRESSION 


USED  IN  MAIN  PROGRAM(S) : 


GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


WRTFRM 
WRITE  FORM 
C 

FUNCTION 
CHAR  *  ( ) 
WRTFRM 

.C 

UI 

FP 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

CHAR  *WRTFRM(FP) 

FIELD  *FP; 

INPUTS : 

FP  -  POINTER  TO  FORM  TO  WRITE  OUT 
DESCRIPTION 

WRITES  THE  SPECIFIED  FORM  INTO  A  . FD  FILE. 
ARGUMENTS : 


OPNPTR  =  FIELD  * 


INCLUDE  FILES; 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  RETURN  CODES 

FORM  FILE  FORMAT  -  VERSION  2 


STDTYP 

STDIO 

FPD 

FPCODE 

FFFV2 


ROUTINES  CALLED: 


SPRINTF 
FOPEN 
SYSMSG 
F WRITE 
FCLOSE 

WRTFRM/WRTTXT 

WRTFRM/WRTFLD 

WRTFRM/WRTTBF 

WRTFRM/TBFCLOS 

WRTFRM/WRTDBF 

WRTFRM/ DBFCLOS 


WRITE  TEXT 
WRITE  FIELD 
WRITE  TEXT  BUFFER 

-  TEXT  BUFFER  CLOSE 
WRITE  DEFAULT  BUFFER 

-  DEFAULT  BUFFER  CLOSE 
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STRASN 

STRCPY 

STRLEN 


CALLED  DIRECTLY  BY: 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


WRTFRM/DBFCLOS 
DEFAULT  BUFFER  CLOSE 
C 

SUBROUTINE 
VOID  0 
WRTFRM 

.C 

UI 

FP 

FDFE/FLAN 


SYNOPSIS 

DBFCLOS (FPTR,  I,  LINE) 

FILE  *FPTR; 

INT  I; 

CHAR  LINE[81]; 

DESCRIPTION 

WRITES  THE  LAST  LINE  OF  THE  DEFAULT  LINE  BUFFER. 
ARGUMENTS: 


FPTR  =  FILE  * 

I  =  INT 

LINE  =  CHAR  [81] 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPCODE 

FFFV2 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  RETURN  CODES 

FORM  FILE  FORMAT  -  VERSION  2 


ROUTINES  CALLED: 


FWRITE 


CALLED  DIRECTLY  BY: 


WRTFRM  -  WRITE  FORM 


USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


WRTFRM/ FORMAT 
INSERT  FORMAT  CODES 
C 

SUBROUTINE 
VOID  0 
WRTFRM 

.C 

UI 

FP 

FDFE/FLAN 


SYNOPSIS 

FORMAT (FLDREC,  FMTl,  FMT2) 
FLDREC  *FLDREC; 

CHAR  FMTl,  FMT2; 


DESCRIPTION 

INSERTS  THE  SPECIFIED  FORMAT  INTO  THE  SPECIFIED  FIELD 

RECORD. 


ARGUMENTS: 


FLDREC 
FMTl  = 
FMT2  = 


FLDREC  * 
CHAR 
CHAR 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPCODE 

FFFV2 


-  STANDARD  TYPE  DEFINITIONS 

-  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

-  FORM  PROCESSOR  DATA 

-  FORM  PROCESSOR  RETURN  CODES 

-  FORM  FILE  FORMAT  -  VERSION  2 


CALLED  DIRECTLY  BY: 

WRTFRM/WRTFLD  -  WRITE  FIELD 

USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


WRTFRM/TBFCLOS 
TEXT  BUFFER  CLOSE 
C 

SUBROUTINE 
VOID  0 
WRTFRM 

.C 

UI 

FP 

FDFE/FLAN 


SYNOPSIS 

TBFCLOS (FPTR,  I,  LINE) 

FILE  *FPTR; 

INT  I  ; 

CHAR  LINE[]; 

DESCRIPTION 

WRITES  THE  LAST  LINE  OF  THE  TEXT  LINE  BUFFER. 
ARGUMENTS: 


FPTR  =  FILE  * 

I  =  INT 

LINE  =  CHAR  [] 


INCLUDE  FILES: 


STDTYP 

STDIO 

FPD 

FPCODE 

FFFV2 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  RETURN  CODES 

FORM  FILE  FORMAT  -  VERSION  2 


ROUTINES  CALLED: 


FWRITE 


CALLED  DIRECTLY  BY: 


WRTFRM  -  WRITE  FORM 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


WRTFRM/WRTDBF 

WRITE  DEFAULT  BUFFER 

C 

FUNCTION 
INT  0 
WRTFRM 

•  C 

UI 

FP 

FDFE/FLAN 


SYNOPSIS 

INT  WRTDBF(FPTR,  FLDPTR,  I,  LINE) 

FILE  *FPTR; 

FIELD  *FLDPTR; 

INT  I ; 

CHAR  LINE[81]; 

DESCRIPTION 

COPIES  THE  SPECIFIED  FIELD  DEFAULT  VALUE  INTO  THE  DEFAULT 

VALUE  LINE 

BUFFER  STARTING  AT  THE  SPECIFIED  POSITION  AND  WRITING  THE 

LINE  BUFFER 

WHEN  FULL.  RETURNS  THE  NEXT  POSITION  TO  USE. 

ARGUMENTS : 


FPTR  =  FILE  * 

FLDPTR  =  FIELD  * 

I  =  INT 

LINE  =  CHAR  [81] 


INCLUDE  FILES: 


STDTYP  -  STANDARD  TYPE  DEFINITIONS 

STDIO  -  ****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FPD  -  FORM  PROCESSOR  DATA 

FPCODE  -  FORM  PROCESSOR  RETURN  CODES 

FFFV2  -  FORM  FILE  FORMAT  -  VERSION  2 


ROUTINES  CALLED: 


FWRITE 


CALLED  DIRECTLY  BY: 


WRTFRM  -  WRITE  FORM 
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USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


WRTFRM/WRTFLD 
WRITE  FIELD 
C 

SUBROUTINE 
VOID  0 
WRTFRM 

.C 

UI 

FP 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

WRTFLD(FPTR,  FLDPTR) 

FILE  *FPTR; 

FIELD  * FLDPTR; 

DESCRIPTION 

WRITES  THE  FIELD  RECORD  FOR  THE  SPECIFIED  FIELD  STRUCTURE. 
ARGUMENTS: 


FPTR  =  FILE  * 

FLDPTR  =  FIELD  * 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  RETURN  CODES 

FORM  FILE  FORMAT  -  VERSION  2 


STDTYP 

STDIO 

FPD 

FPCODE 

FFFV2 


ROUTINES  CALLED: 


FWRITE 

STRCPY 

WRTFRM/ FORMAT  -  INSERT  FORMAT  CODES 

STRNCPY 

MEMCPY 


CALLED  DIRECTLY  BY: 


WRTFRM  -  WRITE  FORM 
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USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE : 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 

DESCRIPTION: 


WRTFRM/WRTTBF 
WRITE  TEXT  BUFFER 
C 

FUNCTION 
INT  0 
WRTFRM 

.C 

UI 

FP 

FDFE/FLAN 


SYNOPSIS 

INT  WRTTBF(FPTR,  TXTPTR,  I,  LINE) 

FILE  *FPTR; 

TEXT  *TXTPTR; 

CHAR  LINE[81]; 

INT  I  ; 

DESCRIPTION 

COPIES  THE  SPECIFIED  TEXT  INTO  THE  TEXT  LINE  BUFFER 

STARTING  AT  THE 

SPECIFIED  POSITION  AND  WRITING  THE  LINE  BUFFER  WHEN  FULL. 

RETURNS  THE 
NEXT  POSITION  TO  USE. 


ARGUMENTS: 


FPTR  = 
TXTPTR  = 
I  = 

LINE  = 


FILE  * 
TEXT  * 

INT 

CHAR  [81] 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  RETURN  CODES 

FORM  FILE  FORMAT  -  VERSION  2 


STDTYP 

STDIO 

FPD 

FPCODE 

FFFV2 


ROUTINES  CALLED: 


FWRITF 


CALLED  DIRECTLY  BY: 


WRTFRM  -  WRITE  FORM 


3-296 


PS  620344502 
30  September  1990 


USED  IN  MAIN  PROGRAM(S): 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


WRTFRM/WRTTXT 
WRITE  TEXT 
C 

SUBROUTINE 
VOID  0 
WRTFRM 

.C 

UI 

FP 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

WRTTXT(FPTR,  TXTPTR) 

FILE  *FPTR; 

TEXT  *TXTPTR; 

DESCRIPTION 

WRITES  THE  TEXT  RECORD  FOR  THE  SPECIFIED  TEXT  STRUCTURE. 
ARGUMENTS: 


FPTR  =  FILE  * 

TXTPTR  =  TEXT  * 


INCLUDE  FILES: 


STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER  **** 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  RETURN  CODES 

FORM  FILE  FORMAT  -  VERSION  2 


STDTYP 

STDIO 

FPD 

FPCODE 

FFFV2 


ROUTINES  CALLED: 


FWRITE 

STRLEN 


CALLED  DIRECTLY  BY; 


WRTFRM  -  WRITE  FORM 


USED  IN  MAIN  PROGRAM (S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 


3-298 


PS  620344502 
30  September  1990 


APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


YYLEX 

LEXICAL  ANALYZER  FOR  FLAN 
C 

FUNCTION 
INT  0 
YTAB 

.C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION: 


SYNOPSIS 

INT  LEX() 

OUTPUTS : 

SETS  YYLVAL  TO  THE  TOKEN  VALUE  (IF  ANY) 
RETURN  THE  TOKEN  TYPE 


DESCRIPTION 

RECOGNIZES  TOKENS  (KEYWORDS,  IDENTIFIERS,  NUMBERS,  ETC.)/ 

SETS  YYLVAL, 

AND  RETURNS  THE  APPROPRIATE  TOKEN  TYPE. 


INCLUDE  FILES: 


FLAN. Y" 

STDTYP 

STDIO 

CTYPE 

FPD 

FPPARM 

RW 

MATH 


****  PURPOSE  NOT  FOUND  BY 
STANDARD  TYPE  DEFINITIONS 
****  PURPOSE  NOT  FOUND  BY 
****  PURPOSE  NOT  FOUND  BY 
FORM  PROCESSOR  DATA 
FORM  PROCESSOR  PARAMETERS 
REPORT  WRITER  DEFINITIONS 
****  PURPOSE  NOT  FOUND  BY 


STRIPPER  **** 

STRIPPER  **** 
STRIPPER  **** 


STRIPPER  **** 


ROUTINES  CALLED: 


GETC 

ERROR  -  ISSUE  ERROR  MESSAGE 

ISALNUM 

ISDIGIT 

FATAL  -  ISSUE  FATAL  ERROR  MESSAGE 

UNGETC 

WARNING  -  ISSUE  WARNING  MESSAGE 

STRCMP 

CSTASH  -  CHARACTER  STASH 

ATOF 

ISALPHA 
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CALLED  DIRECTLY  BY : 

YYPARSE  -  FLAN  PARSER 

USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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APPLICATION  GENERATOR  Module  Documentation 


NAME: 

PURPOSE: 

LANGUAGE: 

MODULE  TYPE: 

FUNCTION  TYPE: 

SOURCE  FILE: 

SOURCE  FILE  TYPE: 
HOST: 

SUBSYSTEM: 
SUBDIRECTORY: 
DOCUMENTATION  GROUP: 


YY PARSE 
FLAN  PARSER 
C 

FUNCTION 
INT  0 
YTAB 

.C 

UI 

FE 

FDFE/FLAN 


DESCRIPTION: 


DESCRIPTION 

DEFINITION  LANGUAGE  GRAMMAR. 


INCLUDE  FILES: 


FLAN. Y" 

STDTYP 

STDIO 

CTYPE 

FPD 

FPPARM 

RW 

MATH 


****  PURPOSE  NOT  FOUND  BY  STRIPPER 

STANDARD  TYPE  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER 

****  PURPOSE  NOT  FOUND  BY  STRIPPER 

FORM  PROCESSOR  DATA 

FORM  PROCESSOR  PARAMETERS 

REPORT  WRITER  DEFINITIONS 

****  PURPOSE  NOT  FOUND  BY  STRIPPER 


ROUTINES  CALLED: 


PRINTF 

STRUPC 

STRNCPY 

FREE 

STRCAT 

MYALLOC 

MEMCPY 

MAKACT 

MAKINT 

STRCMP 

STRLEN 

WARNING 

SPRINTF 

MKPOS 

FATAL 

STRCPY 

CHKFLD 

CHKFRM 

STRCHR 

ERROR 


MY  MALLOC 

MAKE  ACTION  LIST  ELEMENT 

MAKE  EXPRESSION  INTO  AN  INTEGER 


ISSUE  WARNING  MESSAGE 

MAKE  POSITION  NODE 
ISSUE  FATAL  ERROR  MESSAGE 

CHECK  FIELD 
CHECK  FORM 

ISSUE  ERROR  MESSAGE 


*  *  *  * 

★  *  ★  ★ 
*  *  *  * 

★  ★  ★  ★ 
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MAKSTR 

CSTASH 

GFLDPT 

MAKFLD 

FNDATT 

YYERROR 

YYLEX 


MAKE  EXPRESSION  INTO  A  STRING 
CHARACTER  STASH 
GET  FIELD  POINTER 

FIND  ATTRIBUTE 

LEXICAL  ANALYZER  FOR  FLAN 


CALLED  DIRECTLY  BY: 


FLANCI  -  FLAN  CALLABLE  INTERFACE 


USED  IN  MAIN  PROGRAM(S) : 

GRP/MAIN  -  GENERATE  APPLICATION/REPORT  PROGRAM 
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The  following  list  contains  a  purpose  and  description  of 
each  include  file  listed  in  3.10.4  as  specified  in  the  source 
code.  The  language  it  is  written  in  is  also  given. 
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APPLICATION  GENERATOR  Include  File  Description 


FILE  NAME:  CTLCHR 

PURPOSE:  CONTROL  CHARACTERS 

LANGUAGE :  C 

DESCRIPTION: 


DESCRIPTION 

DEFINITIONS  OF  ALL  CONTROL  CHARACTERS  TO  AVOID  CHARACTER 

SET 

DEPENDENCIES. 
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APPLICATION  GENERATOR  Include  File  Description 


FILE  NAME:  ERRPRO 

PURPOSE:  PROCESS  ERROR  INCLUDE  FILE 

LANGUAGE:  VAX- 11  COBOL 

DESCRIPTION: 
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APPLICATION  GENERATOR  Include  File  Description 


FILE  NAME:  FFFV2 

PURPOSE:  FORM  FILE  FORMAT  -  VERSION  2 

LANGUAGE :  C 

DESCRIPTION: 


DESCRIPTION 

RECORD  LAYOUTS  FOR  THE  BINARY  FORM  DEFINITION  FILE 
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APPLICATION  GENERATOR  Include  File  Description 


FILE  NAME:  FLAN 

PURPOSE:  FLAN  INTERNAL  STRUCTURES 

LANGUAGE:  C 

DESCRIPTION: 


DESCRIPTION 

AUXILIARY  DATA  STRUCTURES  USED  BY  FLAN. 
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APPLICATION  GENERATOR  Include  File  Description 


FILE  NAME:  FPCODE 

PURPOSE:  FORM  PROCESSOR  RETURN  CODES 

LANGUAGE :  C 

DESCRIPTION: 
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APPLICATION  GENERATOR  Include  File  Description 


FILE  NAME:  FPD 

PURPOSE:  FORM  PROCESSOR  DATA 

LANGUAGE:  C 

DESCRIPTION: 


DESCRIPTION 

DATA  DEFINITIONS  FOR  ALL  FORM  PROCESSOR  (INCLUDING 

MON I TER) DATA. 
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APPLICATION  GENERATOR  Include  File  Description 


FILE  NAME:  FPDINI 

PURPOSE:  FPD  INITIALIZATION 

LANGUAGE:  C 

DESCRIPTION: 


DESCRIPTION 

INITIALIZED  VERSION  OF  UID  FOR  INCLUSION  IN  MAIN  PROGRAM. 
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APPLICATION  GENERATOR  Include  File  Description 


FILE  NAME:  FPPARM 

PURPOSE:  FORM  PROCESSOR  PARAMETERS 

LANGUAGE:  C 

DESCRIPTION: 


DESCRIPTION:  THESE  DATA  DEFINITIONS  ARE  USED 
IN  THE  FORM  PROCESSOR  ROUTINES. 
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APPLICATION  GENERATOR  Include  File  Description 


FILE  NAME:  NTM 

PURPOSE:  NTM  INTERFACE  INCLUDE  FILE 

LANGUAGE:  C 

DESCRIPTION: 


DESCRIPTION 

INCLUDE  FILE  FOR  NTM  INTERFACE 
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APPLICATION  GENERATOR  Include  File  Description 


FILE  NAME:  RW 

PURPOSE:  REPORT  WRITER  DEFINITIONS 

LANGUAGE:  C 

DESCRIPTION: 


DESCRIPTION 
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APPLICATION  GENERATOR  Include  File  Description 
FILE  NAME:  SRVRET 

PURPOSE:  AS  THE  RETURN  GIVEN  A  TABLE-FULL  ERROR 

LANGUAGE:  VAX- 11  COBOL 

DESCRIPTION: 


MODIFIED  11/2/83  TO  INCLUDE  RET-CODE-5  * 

MODIFIED  1/9/84  TO  INCREASE  ALL  ERROR  CODES  TO  PIC  X(5)  * 

AND  TO  ELIMINATE  ALPHA'S  * 

MODIFIED  1/26/84  TO  ADD  RET-CODE  FOR  GETUSR-NOT-SUCC  * 

SRV-SUCCESSFUL  ADDED  FOR  GENERIC  RETURN  * 

MODIFIED  2/7/84  TO  ADD  ERROR  CODES  FOR  ENTRY-NOT-FOUND  * 

MODIFIED  2/8/84  TO  ADD  WHTHST-NOT-SUCCESSFUL  * 

MODIFIED  2/20/84  TO  ADD  TSTMOD  NEW  CODES.  * 

MODIFIED  20  AUG  84  INITALIZE  ALL  LOCAL  VARAIBLES  TO 
SPACES  OR  0. 

MODIFIED  5/21/85  TO  ADD  RCL  AND  FILGEN  RETURN  CODES 
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APPLICATION  GENERATOR  Include  File  Description 


FILE  NAME:  STDTYP 

PURPOSE:  STANDARD  TYPE  DEFINITIONS 

LANGUAGE:  C 

DESCRIPTION: 


DESCRIPTION 

THIS  FILE  ENSURES  THAT  THE  FOLLOWING  STAND/* RD  TYPFS  APE 

AVAILABLE: 

FLOAT  -  SINGLE  PRECISION  FLOAT 

DOUBLE  -  DOUBLE  PRECISION  FLOAT 

LONG  -  32  BIT  (OR  LARGER)  SIGNED  INTEGER 

LBITS  -  32  BITS  (OR  MORE)  FOR  BIT  MANIPULATION 

INT  -  NATURAL  SIZE  SIGNED  INTEGER 

UNSIGNED  -  NATURAL  SIZE  UNSIGNED  INTEGER 

BOOL  -  NATURAL  SIZE  LOGICAL  (ZERO  /  NON-ZERO  ONLY) 

SHORT  -  16  BIT  (OR  LARGER)  SIGNED  INTEGER 

USHORT  -  16  BIT  (OR  LARGER)  UNSIGNED  INTEGER 

BITS  -  16  BITS  (OR  MORE)  FOR  BIT  MANIPULATION 

CHAR  -  SINGLE  MACHINE  CHARACTER  (REAL  CHARACTERS 

ALWAYS  POSITIVE) 

TINY  -  8  BIT  (OR  LARGER)  SIGNED  INTEGER 

UTINY  -  8  BIT  (OR  LARGER)  UNSIGNED  INTEGER 

TBITS  -  8  BITS  (OR  MORE)  FOR  BIT  MANIPULATION 
TBCOL  -  8  BIT  (OR  LARGER)  LOGICAL  (ZERO  /  NON-ZERO 
ONLY) 

METACHAR  -  16  BIT  (OR  LARGER)  AUGMENTED  CHARACTER 
(SIGNED) 

VOID  -  FUNCTION  THAT  RETURNS  NO  VALUE 

FORTRAN  -  STORAGE  CLASS  FOR  FOREIGN  (NON-C)  KOUTIiULS 
OR  C  ROUTINES 

WHICH  ARE  CALLABLE  FROM  FOREIGN  ROUTINES 

SINCE  NOT  ALL  COMPILERS  SUPPORT  USHORT,  TINY,  AND  UTINY, 

THE  FUNCTIONS 

USHORTO,  TINYO,  AND  UTINY  ()  SHOULD  BE  USED  WHENEVER 

REFERENCING  THEM. 

IN  ADDITION,  THE  FOLLOWING  UTILITY  MACROS  ARE  DEFINED: 
LURSHirT(N,  B)  -  UNSIGNED  LONG  RIGHT  SHIFT 
MAX (A,  B)  -  MAXIMUM  OF  A  AND  B 

KIN (A,  B)  -  MINIMUM  OF  A  AND  B 
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APPLICATION  GENERATOR  Include  File  Description 


ABS(A)  -  ABSOLUTE  VALUE  OF  A 

STRASN(A,  B)  -  TRANSPORTABLE  A  =  B  FOR  STRUCTURES 

NULL  -  NULL  POINTER  VALUE  (0) 

TRUE  -  1 

FALSE  -  0 

SUCCESS  -  EXIT (SUCCESS)  INDICATES  SUCCESSFUL 

COMPLETION 

FAILURE  -  EXIT (FAILURE)  INDICATES  ERRORS 

THE  FOLLOWING  SYMBOLS  SHOULD  BE  DEFINED  BASED  ON  THE 

COMPILER  BEING  USED: 

USHORT  -  COMPILER  SUPPORTS  UNSIGNED  SHORT 
TINY  -  COMPILER  TREATS  CHAR  AS  SIGNED 
UTINY  -  CHAR  IS  SIGNED  AND  COMPILER  SUPPORTS 
UNSIGNED  CHAR 

VOID  -  COMPILER  SUPPORTS  VOID 

FORTRAN  -  COMPILER  SUPPORTS  FORTRAN 

STRASN  -  DEFINE  APPROPRIATE  MACRO 

SUCCESS  -  DEFINE  APPROPRIATE  VALUE  IF  NOT  0 

FAILURE  -  DEFINE  APPROPRIATE  VALUE  IF  NOT  1 
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3.10.10  Hierarchy  Chart 

The  following  hierarchy  charts  show  the  relationships 
between  all  of  the  modules  mentioned  in  the  above  documentation. 
A  module  may  call  a  subroutine  several  times  within  its  code, 
but  the  call  will  only  be  shown  once  as  a  single  relationship  on 
this  hierarchy  chart.  All  modules  shown  at  the  top  of  the  first 
page  are  considered  Main  Programs  as  described  in  section  3.10.1 
above . 


There  is  an  internal  paging  scheme  as  marked  by  the  numbers 
in  the  upper  right  corner  of  each  page.  An  index  after  the  last 
page  of  the  chart  shows  where  a  routine  and  its  calls  are  first 
defined.  If  a  routine  has  no  page  reference,  it  either  makes  no 
calls  or  is  an  external  routine.  A  continuation  box  on  the  end 
of  a  tree  limb  shows  where  that  the  tree  continues  on  the  page 
numbered  mentioned.  A  number  in  a  box  with  a  routine  name 
points  to  the  page  where  the  routine  is  further  defined  within 
the  hierarchy  tree.  If  there  is  no  number  in  a  box,  the  routine 
either  makes  no  calls  or  is  an  external  routine. 
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I MEMCMP I 
+ - + 


- + - 

I 

+  + - h 

I TRMNAT I 
+ - + 


+ — + - + 

I PMSGLC I 
+ - + 


- + 

I 

- — - - J- 

I  (CONT)  I 
+ - 6  + 


+  —  —  —  —  —  + 
|GETFILE| 


+ 

1 

+ - 

1 

1 

1 

- 1- 

1 

1 

4- .  «•  4- ^  ^ -f. 

1 

+ — + — + 

1 

+ - + - + 

1  ERROR  1 

1 FOPEN 1 

1 SPRINTFi 

+ — + — + 

1 

+ - + 

+ - + 

1 

+ - + - 

- + 

4-*’"*  +  — —  — h  -f-  — —  4-  — — — 

+ - 1 — 

-+ 

1 PMSGLS 1  1 STRLEN | 

+ - +  + - + 

1 SPRINTFl 
+ - + 
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4 

+ - + 

I FLANCI I 
+  --+ + 


+ - + - + 

I  1 

+ - + - +  + — + + 

|YYPARSE|  iDELFLDl 
+ + +  + - + 


+ — + - + 

1 PRINTF 1 
+ - + 


””1  r""” 

+ — + — +  + — + — + 

I STRUPC I  I STRNCPY \ 

+ - +  + - + 


+  -I — + 

I  FREE  I 


+  — — -i —  — — + 

I STRCAT I 
+ - + 


+  - + 

I  (CONT)  I 
+ - 7  + 


+ 


-+ 


I  GRP/MAIN  I 

I _ -I - u 


+  --1 - + 

1  (CONT)  I 
+ - 1  + 


—  +  — 

I STRCAT I 
+ - + 


I STRCPY I 
+ - + 


I WRTFRM 1 
+ - 8  + 


•+* 


+  — 4-  — —  + 

I RWOPN 1 
+ - 9  + 


+ 


+  --+ - + 

1 (CONT) 1 
+ - 10+ 


+ - + 

1 FRNTNDl 
+ — + + 


+ - + - + - + - + - + - + 


I 

1 

1 

1 

+ - + 

+  --I - + 

1 

+ - + 

— +  +--i — + 

+ — !---+ 

(CONT) 1 

1 INITFPl 

lADDFRMl  iGDATAl 

1 OISCRl 

1 SPRINTF 

- 2  + 

+ - + 

+  .  — 

— +  + - + 

+ - + 

H - 
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7 

- - - - - ^ 

I YYPARSEl 

+ - 4 - 4 


+  __  + - +  4- - + - +  +--  + - +  +--+ - h  +--4 - +  H - 4 - 4 

I (CONT) I  iMYALLOcj  | MEMCPY |  | MAKACT |  IMAKINTI  | (CONT) | 

H - 4+  ^ “■( H  - H  1 1 *"  ^ - 11  + 

I 

+ — + - + 

I  I 

+  —  — i - h  +— — -i —  — — +  H - i — +  H - i - + 

[FATAL  I  [MALLOGj  | MYALLOC |  | MYALLOC | 

4 - 324  4 - 4  4 - 74  4 - 74 


8 

4 - H 

I WRTFRM I 

4 - 4 - 4 

I 

4 - 4 - 4 - 4 - 4 - 4 - 4 


4 - 4 - 4 

I SPRINTFj 

4 - 4 


4 - 4 - 4 

I FOPEN I 

4 - 4 


4 - 4 - 4 

I SYSMSGl 
4 - 4 


I FWRITE I 
+ - + 


4 - 4 - 4 

I FCLOSE 1 
4 - 4 


4 - 4 - 4 

I  (CONT)  I 

4 - 124 


9 

4 - 4 

I RWOPN I 

4 - 4 - 4 

I 

4 - 4 - 4 - 4 - 4 

I  I  I  I  I 

4--H - 4  4--4 - 4  4 - 4 - 1-  4 - (- - 4  4--4 - 4 

jRWEXPDj  [MLPFRMj  jWINRSVj  | FLDRSV |  | TRGRSV j 

4 - 134  4 - 4 - 4  4 - 144  4 - 154  4 - 164 

^ _ 1^ _ ^ 


4 - 4 - 4  4 - 4 - 4  4 - 4 - 4 

|FNDFRM|  I  ERROR  I  [MALLOCj 

4 - 174  4 - 34  4 - 4 
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4 - H 

1  GRP/MAIN  1 
+ + + 


+ - + - 

I  I 

- ) - -f.  — —  — ^ 

I (CONT) 1  IGENMAIN] 

+ - 5+  + - 17  + 


- + - + - + - 

I  I 

+ — + - +  + — + - + 

I BLDSUB I  I GENACT | 

+ - 1S+  + - 19  + 


- + - + 

I  I 

+  __+ - +  + - + - -r 

[GENPAGI  I  (CONT)  I 
+ — + - +  + - 20  + 


+  -  +  -  + 
I  GEN  I 
+  -17  + 


11 

4 - 1" 

I YYPARSEj 
+ - + - + 

I 

— —  —  —  —  — 4-  — —  —  —  — -f.  — —  —  —  —  — —  -f  — —  —  —  —  —  — —-I- 

I  I  I  I  I 

+  —  4.  —  — -f.  —  —  —  4-  —  — 4  4  —  — —4*.^  — 4  4  —  — 4___4 

1 (CONT) I  |STRCMP|  | STRLEN |  | WARNING]  [(CONT)] 

+ - 7+  + - +  + - +  + - + - +  + - 214- 


+ - + - + 

+ — + - +  + — + - +  + - + - + 

I PMSGLS I  I STRLEN |  | SPRINTF  j 
+ - +  + - +  + - + 


12 

+ - + 

1 WRTFRM I 
+ — + + 

I 

II  II 

+  --  + - 4-  4 - 4- - 4-  + - 4- - +  4 + - 4- 

I (CONT) I  I WRTFRM/WRTTXT I  j WRTFRM/ WRTFLD |  | (CONT) | 

+ - 8+  + - + - 4-  + - 22+  + - 23  + 


+ - + - + 

I  I 

+  __  + +  +--  + + 

jFWRITE]  I STRLEN I 

+ - +  + - + 
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I  I'" 
+  --  + +  +-+-  + 

ICOPFLDl  |ABS| 
+ - +  + + 


+ - + 

[RWEXPDj 
+  --+ + 

I 

I 

+ — + - + - + 


-( - 1 - 1-  - 1 - (-  ^ - 1 - 1- 

|FNDATT|  |STRASN|  | RWSP/FIXFRM | 

+ - 68+  + - +  + - + - + 

+ - + - 1 - + - 

+  --+ - +  + — + - +  + — + - + 

|RWEXPD|  ICOPFLDl  | FNDATT | 
H - 13+  H - h  H - 68  + 


13 


+  --+ - + 

I STRCMPi 
+ - + 


+ - + 

1 WINRSVl 


+  - 

-+ - + 

1 

+ - 

- + - 

1 

1 

—  H - -H - 

1 

- + - + 

1  1 

+ - [ - + 

1 

+  --+ - + 

1 

+ - + - + 

+ 

1 

1 

+— 

1 

1 

1 

+ 

+ 

1 

+— 

1 

1 

+ 

1 MALLOC 1 

1 GETPTH 1 

1  FNDFPJ^  1 

ICOPFLDl  |FREE| 

+ - + 

+ — + - + 

+ - 17  + 

+ - +  + - + 

+ - + - + - + - + 


+  __  + - +  +  —  + - +  + — + - +  + — + - + 

|PTHPTR|  ISTRCPY]  |STRUPC|  j STRCHR | 
+ - +  + - +  + - +  + - + 


14 


+ - + 

I FLDRSVl 

+  __  + + 

1 

+ - + - + - + 

+  --  + - +  +--  + - +  + - + - + 

I FLDRSVl  |CTLRSV|  | STATRSV | 

+ - 15+  +  —  + - +  + - + - + 

I  I 

+ - + - +  + - + - + 


+  --+ - +  +--+ — +  +--+ - +  +--+ - 1- 

|GETPTH|  I  ERROR  I  | GETPTH |  | ERROR | 

+ - 14+  + - 3+  + - 14+  + - 3  + 


15 
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+ - + 

1 TRGRSV I 


+ - 

1 

1 

1 

1 

1 

-  + 

1  + 

1  1 

1  1 

+ —  + 

- + 

1 

j 

1 

+  --+ - + 

1 

+ — + — + 

1 

+ — + - + 

I 

+  —  +  --  + 

1 GETPTH 1 

1  ERROR  1 

1 ACTRSV 1 

1 UQPTH 1 

+ - 14  + 

+ - 3  + 

+ — + - + 

1 

+ - 24  + 

+ - 

1 

1 

1 

1 

- + - 

1 

1 

+ — + - + 

1 

+ - + - + 

1 

+ — + - + 

+ — + - + 

1 

+  — + — + 

1 GETPTH 1 

1  ERROR  1 

1 SELRSV 1 

1 INSRSV] 

1 UQPTH 1 

+ - 14  + 

+ - 3  + 

+ - 2  5  + 

+ — + - + 

1 

+ - 24  + 

1'"” 
+ — + — + 

1 UQPTH 1 
+ - 24  + 

1 

+  — 1--  + 

1  ERROR  1 
+ - 3  + 

+  —  1 - + 

1 GETPTH 1 
+ - 14  + 
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-) —  —  — 

iGENMAINj 
+ - + - + 


*r  —  — ’  *  —  — 

- H 

h - - 

I 

- + - 

1 

--+ 

1 

+  --1 — + 

+ - H 

h — + 

1 

+  --+ - + 

+  --+ — + 

1 

+-+-+  + 

+  + 

1 FNDFRMi 

1  HAS ITEM  1 

iGENBEGl 

iMKINCl 

1  gen  I  1 

(CONT)  1 

+  --  + - + 

+ - H 

h — + 

+  — + - + 

1 

+ - 26+ 

i 

- 27  + 

1 

+ - + - + 

1  1 

+  --  + - + 

+ - H 

h — + 

1  1 

- +  + 

^  — 

h— + 

i STRCMP 1 

1 HASITEMl 

iGENl  ISPRINTFl  I 

FPRINTFl 

- - + 

+ - 

--17  + 

+-17+  + - 

- +  + 

- - 

- + 
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+ 


+  --+ - + 

I  (CONT)  1 
+ - 10+ 


+ - + - + 

I  HAS DATA  I 
+ - + - + 


+ - + 

1 BLDSUB| 
+ — + + 


+ — + - + 

I BSCODE] 
+ 28  + 


+ — + - + 

I BLDSUBj 
+ 18  + 


+ - + - + 

I  HAS DAT A  I 
+ - 18  + 


18 


+ - + 

1 GENACT I 
+ — + + 


I”'" 
+  --+ - + 

I GENAALj 
+ — + - + 


+ — + - + 


+ — + — +  + — + - + 

I GENAA I  1 GENDOA | 

+ — + — +  + - 29+ 


+ - + - + 


+  _  +  4- - 1- - 4-  4 — 4._4. 

[GEN  I  ISPRINTFl  | GEN ] 
+  -17+  + - +  +-17  + 


+ 


20 


1  GRP/MAIN  I 

i- - 4. - 4 


+ - + - + 

1 NDMLGEN | 
+ - 30+ 


___4— + 

+ — + - + 

1 PMSGLC I 

4- - 4- 


___4  — 

+ - + - + 

jOISCRl 
+ - + 


+ — + — + 
I TERMFPl 
+ - + 


+ — + — + 
I  (CONT)  I 
+ - 31  + 
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+ - + 


I YY PARSE  I 
+ - + - + 


I”” 

-I - -f 

I  (CONT)  I 
+ - 11  + 


+ - + - + 

I SPRINTFl 
+ - + 


- + — + 

I 

+ — + — + 
I MKPOS i 
+ — + — + 


+ - + - + 

I MYALLOC 1 
+ - 7+ 


1  FATAL  I 
+ - 32  + 


1 STRCPY 1 
+ - + 


+ 


I  (CONT)  I 
+ - 33  + 


+  *■*" —  —  —  —  — -f 

I WRTFRM/WRTFLD | 
+ - + - + 


+  --I - + 

I FWRITEl 
+ - + 


+  •"  —  4’  —  "“  + 

I STRCPY I 
+ - + 


+ 


+ 


+ 


I WRTFRM/FORMAT I 
+ - + 


I STRNCPY 1 
+ - + 


I MEMCPY I 
+ - + 
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+ - + 

I WRTFRM I 
+  — + + 


+ 


r--  + - + 

i (CONT) I 
+ - 12  f 


- + - + 

I 

—  4-  —  —  + 

I WRTFRM/WRTTBF I 
+ - + - + 


- + - 

I 

+ - + - + 

1 WRTFRM/TBFCLOS | 
+ - + - + 


+ 


+  --  + - + 

I  (CONT)  I 
+ - 34  + 


+  — + - + 

I FWRITE I 
+ - + 


+  --  + - + 

I FWRITE 1 
+ - + 
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+ - + 

|UQPTH| 
+  --+ — + 

+ — I - + 

I MALLOC I 
+ - + 


— |-  — 
+ — + - + 

1 PTHPTR I 
+ - + 


+ — + — + 
I STRCHR I 
+ - + 


+ — + — + 
I STRCPY 1 
+ - + 


24 


+ - + 


I SELRSV| 
+ — + + 


25 


I'”' 
+  — + - + 

I SELRSV| 
+ 25  + 


+  --  +  --+  + H - 1-  +--  + - + 

I UQPTH I  1  ERROR ]  | GETPTH | 

+ 24+  + 3+  + 14  + 


iMKINCl 
+  --+ — + 


26 


+ 


+ - 4- - + - + - + 


+ - + - + 

I HASITEMi 
+ - 17  + 


+ - + - + 

I SPRINTF] 
+ - + 


+ — + - +  +_+ — + 

1 STRLEN I  I  BEEN | 

H - — - 1-  -f-  — — 


+  -  +  -  + 
I  GEN  I 
+  -17  + 


+  --  +  —  + 
I  ERROR  I 
+ - 3  + 
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I GENMAINj 
+ - + - + 


+ — + - +  + — + - +  + — + - +  + — + - +  + - + - +  + — + - + 

I (CONT) I  |GENTRG|  1 STRCHR |  |GENFSD|  ISPRINTF]  | (CONT) | 

+ - 17+  + - 35+  + - +  + — + - +  + - +  + - 36+ 

4- - + - +_+ - + - + - + 

I  I  I  I  I  I 

+ - + - +  + - 4- - 4-  4- - 4- - 4-  4- - 4- - 4.  4._4_4.  4 - 4. - 4 


jlSOPNEl  iHASITEMj  ISPRINTF]  | STRLEN [  | GEN |  | (CONT) | 

4 - 4  4 - 174  4 - 4  4 - 4  4--17+  + - 37  + 


4 - 4 

I BSCODE I 

4 - 4 - 4 


II  II 

4  — —  —  4  — —  —4  4— 4  —  4  4«.-.4___4  4_  — _4 - 1-  4__4 - 4__4___4 

|SPRINTF|  |GEN|  | READDB |  lRSETNDP|  iMAPDB]  j  (CONT) ] 

+ - +  +-17+  + — + +  + - 38+  + 39+  + 40+ 


4 - 4 - 4 

I 

4-  — +  — —  —  —  +  ^-...4-  —  — — 

HAS  LOWER  1  I DBFREAD | 

4 - 4  4 - 4 - 4 

I 

4 - 4 - 4 

I  I 

+ - + - +  +-  +  -  + 

jSPRINTFj  jGENj 

+ - +  +-17  + 
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29 

+ - + 

Igendoa] 

+ — + + 

^ _ ^ _ _ 

I  I  +1  +  I 

+  — H - 1"  H - K - (•  H 1 1-  H - 1 - 1-  H - 1 - 1- 

|GENl  iDCLINDXl  |GENAL|  ] STRCHR j  ISPRINTF] 

+  -17+  + - 70+  + — + — +  + - +  + - + 

^ _ ^ _ _ 

+  ■"“+““+  +“+“+  -J-— —4-— — +  +— — -i - 1-  — -j-  —  —— + 

lUQFORl  I  GEN  I  ] GENAP [  | GENAR |  | GENAQ |  ]  (CONT)  [ 

+ - 51+  +-17+  + - 41+  + - 42+  + — + — +  + - 43  + 

_ ^ _ _ 

I  I  I  + 

+  —  ^ - i - h  — - h  — —  — h  H - \ - 1- 

ISELWHRl  |SPRINTF|  | GEN |  |CLRNDP|  | SELOPN j 
+  —  — I “+  — — _l — 17+  + 71+  H - 44  + 


ISPRINTFj  IMAKQR]  | GEN [  |SELWHR| 
+ - +  + - 35+  +-17+  + - 29+ 
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+ - + - + 

I STRNCPY 1 
+ - + 


+ - + 


j  NDMLGEN | 


30 


’"T'” 
+ — + — + 

[SPRINTFl 
+ - + 


+ — + — + 
I FOPEN I 
+ - + 


"T”' 
+ — + — + 

I SYSMSGl 
+ - + 


+ - + - + 

I STDCODE 1 
+ - 45+ 


+ - [- - + 

1 FCLOSE 1 

+  — f- 


+ 


+ - + 

j  GRP/MAIN  I 
+ + + 
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+  ■"  “-t ■“  + 

1  (CONT)  I 
+ - 20+ 


I TRMNDML | 
+ - + 


+ - 1- - + 

I STRCHRl 
+ - + 


+ - + - + 

I SPRINTF] 
+ - + 


+ - + 

j  FATAL) 
+ — + — + 


+ — + — + 

I STRLEN I 
+ - + 


+  --+ - + 

1 PMSGLS I 
+ - + 
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+ - + 

I YYPARSEl 
+ - + - + 


-  +  -  +  - 


-  + 


+  --  + - +  +  —  + - + 

I (CONT) i  ICHKFLD] 
+ 21+  + 46  + 


+  --  + - +  +  —  + - +  +--H - +  +--H - + 

|CHKFRM|  |STRCHR|  | ERROR |  |(CONT)i 

+ — -(- - +  4- - +  + - 3+  + - 47  + 


-+- 


+ - + - +  + —  + - +  + — + - +  +_+_+  +  —  + - +  +  —  + - + 


WARNING 


ADDCHK 


CHKARY 


I  ABS| 


STRLEN 


(CONT) 


■11+  -4---  + - +  + - 48+  + - +  + - +  + - 49  + 

I 

+ - + - + 


+--+ +  +--+--+ 

|FLDTYP|  I  error! 
+ - +  + 3  + 


+——————+ 

I WRTFRM 1 
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+  __+ - +  + - ^ - +  + - + - +  +__4- - + 

I (CONT) I  I WRTFRM/WRTDBF 1  | WRTFRM/ DBFCLOS |  | (CONT) | 

+ - 23+  + - + - +  + - + - +  + - 50+ 


+  --+ - + 


I FWRITE I 
+ - + 


+  —  + - + 

I FWRITE I 
+ - + 
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+ - h 

! GENTRG 1 
+ — + + 


+  --i - + 

I STRCHRl 
+ - + 


-+- 


-+■ 


-+ 


+  —  —  —  +  —  —  —  +  +— +— +  +  —  — ^ —  —  H —  —  — I-  -) - + - + 


SPRINTFl 


GEN 


MAKQR 


STRCPY 


(CONT) 


+  - 


STRCAT I  I STRCPY 
- +  + - 


■-+ — +  + - 

I 

-+  + - 

1 

1 

1 

*H"  H —  —  — - —  4- 

4- - + - 

’1  1  SPRINTFl 

1 ISOPNE 

.+  + - + 

H - 

|GENMAIN| 


+ - + - + 

1  . 

j 

1  1  1 

I 

1 

1 - + - + 

1  1  1 

+  —  —  —  +  +  —  — +  — —  —  ^ 

1 

+ — + - + 

1 

+ — + - + 

i  (CONT)  1 

|GENFS|  iGENFPl  IGENNDP] 

1 GENCHG 1 

1  (CONT)  1 

+ - 27  + 

+ - 52+  H - 53+  + - 54  + 

+  --+ - + 

+ - 55+ 

+ - + - + 


+  — - \ - h  - f-  — 

|SPRINTF|  I  GEN  I 
+ - -f  +-17  + 


IGENFSD] 

+  —  + - + 

I 

+ - + - + 

I  I  1 

+  --  + - +  +--  + - +  + 

I (CONT) I  |GENFSD|  [ MAKQR [ 

+ 27+  + 27+  + 35  + 
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+ - + 

I GENAP I 
+ — + — + 


+ - + - + - + 

I  I  1 


1  GEM  1 

1  FR14PDAT  1  1 

SPRINTF 1 

+  -17  + 

-1 - 1 - ^  4. 

- + 

-t - 1 - h  +"“ j-  — —  —  —  4-  -I — — .4-  —  _  — 

i HAS ITEM  I  I CALCSTAT \  \ SPRINTF |  | GEN |  | RSETSTAT | 

-I - *  —  ^*7-1-  ^ - *  —  - ^—2.7+  H - H - - — f" 

+ - + - + - + - + 


-I- - + - +  + - + - +  + - + - +  +_4._4. 

[RSETSTAT I  [ MAKQR j  | SPRINTF |  | GEN [ 

+ - 41+  + - 35+  + - +  +-17  + 


+ - 4. 

1 GENAR I 


+ — + — + 


42 


I FNDFRMj 
+ 17  + 


-t 


'  (CONT) I 
^ - 29  + 


1  1 

-+ - 1 - 

i 

1 

+ 

1 

1 

1 

— + 

1 

1 

+ 

+ 

1 

— + 

1 

+ 

+ - + - + 

1 

+ — + — + 

1 

|GEN|  [iSOPNEj 

[HAS DATA] 

1 HASITEMj 

1 (CONT) 1 

+  -I7+  + - + 

+ - 18  + 

+ - 17  + 

+ - 58  + 

+ 

- + 

1 

GENALj 

+ 

—  + — + 

1 

1  1 

1  ^ 

- +  — 

- 4- 

+ 

1 

1 

-  + 

1 

1 

+ 

+ 

1 

1 

— + 

1 

1 

+ 

+ 

+  --4---4- 

1  GENAS  1  [GENAEj 

1 GENAH 

1  [GENATj 

1 GENAI 1 

+ - 59+  +--+--+ 

+  —  +  -- 

+  4 - 60  + 

+ - 61  + 

+ - +-- 

1 

--  + 

1 

+  -  +  -+ 

1 

+ - + - + 

1 

+  _  +  _  + 

|GEN| 

1 SPRINTF  1 

1  GEN  1 

+  -17  + 

+ - f 

4 — 17  + 
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I SELOPN I 
+ — + + 
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I  I 

+ - + - +  +_+_+  + - + - +  + — + - + 

|SPRINTF|  I  GEN  I  [ DBFREAD |  | SELOPN | 
+ - +  +-17+  + - 28+  + - 44  + 


+  --+ - + 

I ENDGEN I 
+ - 62  + 


+ 


+  --+ - + 

I  SELECT] 
+ - 63  + 


—  —  — —  _  — 

I STDCODE I 
+ - + - + 

|- 

+  + 

I SPRINTF] 
+ - + 


I PROCGEN I 
+ - 64  + 


+ 


+ — + - + 

I  (CONT)  I 
+ - 65  + 


45 


+ - + 


I CHKFLDI 
+ — + + 


46 


+ - + - + — + - + - + - + 

I  I  I  I  I  I 

+  __  + - +  -I- — + — +  + — + - +  +-+-+  +-+ — +  + — + - + 

|FNDATT|  I  ERROR  I  |MEMSET|  j MAX |  | FREE |  j  (CONT)  | 

+ - 68+  + - 3+  + - +  + - +  + - +  + - 66+ 
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+ 


+  --  + - + 

1  (CONT)  I 
+ - 33  + 


(CONT) 

, - 33 


I YYPARSEl 
+ - + - + 


+  --+ - + 

I MAKSTRj 
+  —  + + 


MYALLOC I 
- 7  + 


+ — + — + 
I CSTASH I 
+ - 67  + 


+ — + — + 
[GFLDPTl 
+ — + - + 


+ — + + 

I STRCMP I 
+ - + 


+  __+ - + 

iMAKFLDl 
+ - + 


+  --+ - + 

1  (CONT)  I 
-) - 68  + 


48 

+ - + 

I CHKARY  j 
+ — + - + 

^ _ _ ^ 

I  "'l  I 

+  ““"■"••+'•“  —  "■4-  4--^.-^  — 4- _ 4- —  4. 

I MYALLOC I  |ABS|  | STRASN | 

+  7  ■+•  4--»  — —  +  4  _  —  — _ —  -j- 


1  FREE  I 

-t  + - + 


+ - 1- 

1 CHKFRMi 
+  --+ - + 

+ — + - +  + — I  —  + 

jFLDTYPl  1  ERROR  I 
+ - +  + - 3  + 


+  __+ + 

I GFLDPT 1 
+ - 47  + 


+  --  + - + 

I  (CONT)  I 
+ - 69  + 


49 


+ - + 

I  V^^RTFRM  i 

+  —  + - -1- 

^ _ 

-t — I — +  +--I — +  +--i — + 

I (CONT) I  I STRASN I  | STRCPY | 
H - 34+  + - H - 


+  --  + - 

I STRLEN I 

H - 1- 
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51 

+ - + 

I GENTRG I 
+  — + + 


+ 


+  --+ - + 


I (CONT) I 
+ 3  5  + 


+  --H - + 

I STRLEN] 
+ - + 


H - + - +  +--H - + 

I STRCAT I  I UQFOR | 

+ - +  + — +  —  + 

I 

+ - + - + 

I  I 

+ - + +  +-  +  -+ 

ISPRINTFj  I  GEN] 

+ - +  +-17  + 


H - + - + 

I GENTALj 
+  --+ + 


+--+--+ 

I GENAL] 
+ 29  + 


1  (CONT)  I 
+ - 70  + 


H - 1 - + 

) ISOPNE I 
+ - + 


+ - + 

[GENFS I 
+ — + — + 

_ 

’  'I  '  ^ '!  i” 

4-—— — -f. — — — 

|HASITEM|  ISPRINTFj  | GEN | 
+ - 17+  + - +  +-17  + 


+--+--+ 


1 GENFS 1 
+ 52  + 


52 


53 

+ - + 

I GENFP| 

+--+--+ 

I 

+ + - + 

1  i 

+ + - +  +-+-  + 

|SPRINTF|  I  GEN  I 
+ - +  +-17  + 
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+ - + 


|GENNDP| 


+ — +-- 
1 

--+ 

1 

+ - +-- 

1 

1 

1 

4 - 1 - -  — + 

1 

+  -+-+ 

1 SPRINTFl 

iGENl 

+ - + 

+  -17  + 

54 


55 

+  —  — - —  — - 

[GENMAINj 


H — 

— + - + 

1 

-t- - 

1 

-+ - 

1 

1 

- + 

1 

1 

+ 

+ 

1 

1 

1 

—  + 

1 

1 

+ 

-  + - + 

1 

+--+--+ 

1 

+ - + - + 

1 (CONT) 1  1 GENDS I 

|GENDB| 

1 GENINS 1 

+ - 36+  +-• 

-  +  --  + 

1 

+--+--+ 

+  —  + - + 

+ - 

1 

1 

-  + - + 

1 

+ - + - + 

1  1 

+ - + - + 

1  1 

1 

+  -  +  -  + 

1 

+ - + - + 

1  1 

.  _  .  4> 

+ 

+  - 

1 

+ 

+ 

1 

1 

1 

+  - 

1 

1 

1 

+ 

1  GEN  1 

1 SPRINTFl 

1 SPRINTFl  |GEN| 

|GENl  1 SPRINTFl 

+  -17  + 

+ - + 

+ - +  +-17  + 

+  -17+  + - + 

I VISITAl 
+  --+ + 

1 

4- - + - + - + - + - + - 4- 

I  I  I  I  I  I 

- - 1 - h  + - 1 - H  H - 1 - 1-  H - 1 - 1-  H - 1 - f-  ^ - 1 - 1- 

iVISITAl  |HASDATA|  [ GEN |  j MAKQR |  jHASITEMl  |(CONT)| 

•( - 56+  H - 18+  +  — 17+  H - 35+  "I - 17+  H - 71  + 
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+ - + 

1 CALCSTAT I 
+ + + 

^ _ ^___| _ 

+ — I — +  + — I — + 

I CALCSTAT I  |MAKQR|  |SPRINTF| 
+ - 57+  + - 35+  + - + 


+  -+-  + 
I  GEN  I 
+  -17  + 


+  * - ^ 

1 GENARl 
+  __+  —  + 


I””  'I  'I  "I 

+  --  + - +  +--+ - +  + - + - +  + - + - 1- 

I (CONT) I  |STRCMP|  | FRMPDAT |  |SPRINTF| 
+ - 42+  + - +  + - 41+  + - + 


57 


58 


59 

+ - + 

I  GENAS  1 
+--+--+ 


+ - + - + - + - + - + - + 


+  __  + - +  4.__4.__+  +--  + - +  + - h - +  +-+-+  +--  + - + 

|ISOPNE|  iMAKQRj  | STRCPY |  |SPRINTF|  j GEN |  | (CONT) | 

+ - +  + - 35+  + - +  + - +  +-17+  + - 72-r 
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60 

+ - + 

1 GENAT I 

+ — + — + 

^ _ _ ^ 

+ + - +  + - + - +  +-+-+ 

I  WARNING  1  ISPRINTFl  | GEN | 

+ - 11+  + - +  +-17  + 


61 

+ - + 

|GENAI 1 
+ — +  —  + 

) 

+ - ++ - + 

I  I  I 

+  --+--+  + - + - +  +-+-  + 

|MAKQR|  |SPRINTF|  | GEN | 

+ - 35+  + - +  +-17  + 


62 

+ - + 

) ENDGEN) 

+ — + - + 

I 

+ - + - + 

I  I 

+ - + - +  +__  + - + 

|FPRINTF|  I  INDENT  I 

+ - +  + - i- - + 


+-+--+ 

I PUTC I 
+ - + 
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63 

1  SELECT  I 
+  — + - + 


+ — + - + 

I SELGEN I 
+ — + - + 

I 

+ - + - + - + - + - f - 4- 

I  I  I  I  I  I 

+  __  + - +  +--  + - +  + - + - +  + - + +  + - + - +  + - + - + 

I SELGEN I  jNULBLKl  | STRCPY |  | PEMAP |  |SPRINTF|  | (CONT) | 

+ - 63+  +--+ - +  + - +  + — +  —  +  + - +  + - 73  + 

I  1 

+ - + - +  + - + + 

I  i  I  i 

+  —  + - +  + — + - +  +-  +  -+  +--  +  —  + 

|STRCHR|  I STRCPY]  | CPE |  | COBPE ] 

+ - +  + - +  + - + 

I 

+ - +  + - + 

+  —  “  —  +  *  —  +  4- —  —  — .4.  —  —  — -f  4.  —  — .4. «  —  _4. 

|FPRINTF|  |CHKSIZE|  | INDENT] 

+ - — — +  H —+  —  ——+  H - 62  + 

+ - + - + 

I  I 

+  _+ — +  + - 1- + 

jBLENj  ]FPRINTF] 

4. - 4. - 4. 


64 

+ - + 

] PROCGEN 1 
+ - + - + 

1 

—  4.  —  —  —  —  «.*_*4_  —  —  —  —  —  —  4-  —  —  —  *4-___  —  —  —  —  —  —  4.  —  —  —  —  —  —  —  —  —  4- 

+  -  +  +--  + - +  + - + - +  +--  + - +  +--  + - + 

jMAP|  ]USING]  ]OPNFIL]  ] NDMLLAB ]  ]CLSFIL]  ] (CONT) ] 

+ - +  +--+ — +  + - 74+  + - + - +  + - 75+  + - 76  + 

I  I 

4 - 4 - 4  4 - 4 - 4 

4__4 - 4  4 - 4 - 4  4---  + - +  + - + - + 

I  INDENT]  ]FPRINTFj  ] INDENT]  JFPRINTF] 

4 - 52+  + - +  + - 62+  + - + 
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65 

+ - + 

\ STDCODE I 

+ - + - + 

1 

+ - + - ++ - + - + 

I  I  I  I  I 

+  --+ - +  + - + - h  + - H - +  + - h - +  +--+ - + 

1 (CONT) 1  IFPRINTF]  | DATAGFN j  [ STRUPC |  | INSERT | 

+ - 45+  + - +  + - + - +  + - +  + - 77  + 

I 

+ - + - + - + - + 

I  I  I  !  I 

+ — + — +  + — + — +  +--+ — +  + — + — +  +--+ — + 

jNDMLLNKl  IFILELNKI  [INDENT]  j FPRINTF |  |(CONT)| 

+ - 78+  + - + - +  + - 62+  + - +  + - 79  + 

_ ^ 

+  --  + - +  + - + - •+ 

I  INDENT  I  I FPRINTF I 

+ - 62+  + - + 


1 CHKFLDj 
+  — + + 

- - + - + - + - + - + - + 

i  I  I  I  I  I 

- ^  1---+ - +  +-  + - h  H - H - h  +__+ - +  + - 1 - y 

(CONT) I  [WRTEXPj  | BEEN |  j MEMCPY |  [SYSMSGj  |(CONT)| 

- - 46+  + - 80+  + - +  + - +  + - +  + - 81  + 
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-I - 1- 

I CSTASH I 
+  --+ + 


67 


+  - 


-+ 


+  - +  + - + - +  + - + - 4- 

|STRCPY|  |STRLEN|  | MYALLOC | 
+ - +  + - +  + - 7  + 


+ - + 

I YYPARSE I 

-I - 1 - ^ 


63 


H - 1 - 1-  - 1 - (■  H - 1 - 1-  H - 1 - 1- 


I (CONT) I 
+ 47  + 


FNDATT I 
- + - + 


+  --+ + 

I STRCMPl 
+ - + 


I  YYERROR I 
+ - + 


I YYLEX I 
+ 82  + 


+ - + 

I CHKFRMi 


+  —  +  -- 
1 

-  + 

4 - 

1 

- +  +  — 

1 

1 

__._  + 

— ! — 

+  -  +  -  + 

1 

+  -+-  + 

1 

+  --+ - + 

+  --  + - + 

CONT)  1 

1  ABS  i 

1  MAX  1 

1 STRASN 1 

1 FNDATT 1 

- 49  + 

-j - +. 

H - + 

+ - + 

+ - 68  + 
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+  --+ 4- 

I (CONT) I 
+ - 51  + 


+ - + - +  + — + - +  +--+ — + 

iDCLINDXj  [STRCMPl  | ERROR | 
+ - + - +  + - +  + - 3  + 


+  — H - 1"  H - 1 - +  + - 1 - f-  H - 1 - +  H - '  -  — —  +  H - 1 - 1- 

|MAX|  |STRCPY|  lSPRINTF|  | STRLEN j  | STRCAT |  | GEN | 

+ - +  + - +  + - +  + - 4-  + - -I-  +_]_7  + 


I VISITAl 
+ — + + 


I (CONT) I 
+ - 56+ 


|CHKGRP|  ISPRINTFl  ] STRLEN [ 
+ — + +  f - +  + - + 


+ + - +  H - + +  +-  +  -+  + h +  + + + 

iHASLOWERj  jSPRINTFl  | GEN |  |CLRNDP|  | DBFREAD | 
+ - +  + - +  +-17+  +--  + - +  + - 28  + 


I  I 

+ - + - +  +-+-+  +--+ - + 

ISPRINTFl  I  GEN  I  |CLRNDP| 
+ - +  +-17+  + - 71  + 


+ - + 

I  GENAS  I 
+  --+ — + 


+  --  + - +  +--  + +  +--  + + 

I (CONT) I  |STRSPN|  | STRLEN | 
+ 59+  + - +  H - h 
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I  SELGENi 


1 

- + 

+ - 

1 

1 

1 

1 

1 

— -| - 

1 

1 

+  --+ - + 

1 (CONT) 1 
+ - 63  + 

1 

+  -+ — + 

1  DASH  1 
+  —  77  + 

1 

+ — + — + 

1 GETTBLi 
+  --  + + 

1 

1 

+  — + - + 

|GETCOL| 

+ - 77  + 

+  --  + - + 

1 OPNFILl 
+ - 74  + 

1 

+ - 1- - + 

1  (CONT)  1 
+ - 83  + 

+ - 

1 

1 

- + - 

1 

1 

+  --  + - + 

1 STRCHRl 
+ - + 

+  —  +  — + 

1 ESCPY 1 
+ - + 

1 

+  --  + - + 

1 NULBLKl 
+ 63  + 

1 

+ — + - + 

1  STRCMP 1 
+ - + 

1 

+  __  + + 

1 STRCPY 1 
+ - + 

I OPNFILl 
+  --+ - + 


I  ’"I'"' 

I  INDENT  I  |FPRINTF| 

+ - 62+  t- - + 


+  --+ - + 

I OPNFILl 
+ - 74  + 


+  --+ - + 

I CLSFILl 
+ - 75  + 


+ - + 

I CLSFILl 
+  --+ + 

+ — + — + 

I FPRINTFI 
+ - + 


+  --+ - + 

I  INDENT  I 
+ - 62  + 


75 
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1 PROCGEN I 
+ - + - + 


+  __  + - +  - +  +--  + - +  -r - + - +  + - + - +  + - + - + 

I (CONT) I  |INSMAP|  |SELMAP|  ( INDENT |  | FPRINTF |  |PSESMAPj 

-t - 6  4  "1 - - — ^  +”■■“■1 - h  +  — 62"^  "i - - - - ^ 

I 

+ — + — + 

I  I 

+ — + — +  + — + — + 

lESPSMAPj  [SELMAPj 
4- - + - +  + - 76+ 


+--+--+ 
I  CESPS  I 


+ - + - + 

I COBESPS I 
+ + + 

_ I _ 


+  —  -f- — .  — .  4- —  —  — ^  —  — . — -j — — .  — . -j-  -j.  — — -f-  — . — j_ 

|DASH|  |GETTBL|  iGETCOLl  |CHKSIZE|  |FPRINTF|  |(CONT)| 

-t  —  77+  ^ - 73+  H - 77+  4 - 63+  4 - (■  4 - 84  4 


1  INSERT! 
+  --+ - + 


+  --  + - -r  + + +  + h - + 

I  INDENT  I  I FPRINTF I  |GETC0L! 

t- - 62+  + - +  +--  + - + 


+  _+__4. 

1  DASH  I 
+-+--+ 


+ - + - + 


+  — - — — —  -f-  -j - —  —  —  - 

jSTRCHRj  jSTRCPYj  | STRCHR ] 
+ - +  + - +  - + 
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78 

+ - + 

I NDMLLNK | 

+ - + - + 


+ + - + 

I  I 

+--+ - + 

|MAKWH|  iMAKINSj 
+  --+  —  +  + 85  + 

I 

+ - + - + - + - + 

111  I 

+ - + - +  + - + - 1-  + - + - +  + - + - + 

I PSSTRC/INDENT I  [FPRINTFI  | PSSTRC/CSUB |  | PSSTRC/COBSUB | 

+ - + - 1-  + - +  + - 86+  + - 87  + 


+-+--+ 

1 PUTC I 
+ - + 


79 

+  —  —  —  — 

I DATAGEN ] 

+ - + - + 


+  --  + - + 

I  (CONT)  I 
+ - 65  + 


1 

i 

1 

-  + 

1 

1 

1 

1 

1 

+ 

1 

-  + 

1 

1 

--+ - 

1 

- 1 

1 

+  --+ — + 

1 

4- - 1 - j- 

1 

+  +  -+ 

+  --  + - + 

1 SELWS 1 

INSWS 1 

|FD| 

1  ASSIGN  1 

+ - 88  + 

+ - 89+ 

+  90  + 

+ — + - + 

+ - + - + 


+ - + - +  +--+ - + 

IFPRINTF]  1  INDENT  1 
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+ - + 

1 WRTEXP I 
+  — + + 


+-+--+ 
1  FREE  I 
+ - + 


"T'” 

+  “  — h  — - 1" 

I WRTEXP 1 
+ - 80+ 


1 MEMCPY I 

4. - 4. 


+ — + — + 
I MYALLOC I 
+ - 7  + 


—  — -j - 1- 

I STRLEN 1 
+ - + 


+ — + — -t- 

ISPRINTF] 
+ - + 


81 

■- - + 

(CHKFLDj 
+ — + + 


I  1’"'" 

4. — 4. - 4.  4- - 4. - 4- 

I (CONT) 1  I MYALLOC I 
4 - 66+  H - 7  + 


+  — + - + 

I STRLEN I 

+ - h 


82 

+ - + 

I YYLEX) 

+ — + — + 

1 

+ - + - + - + - + - + - + 

I  II  III 

4._4.__4.  4.__4.__4.  4- - 4. - 4.  4 - 4. - 4.  4.__4.__4.  4---  + - + 

IGETC]  |ERROR|  |lSALNUMj  jlSDIGITl  |FATAL1  |(C0NT)| 

I - 4.  4. - 34.  4- - 4-  4. - 4.  + - 324-  + - 91  + 
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+ - + 

I SELGENj 
+ — + + 


+ — + - + 

i  (CONT)  I 
+ - 73  + 


+ - + - + 

I FPRINTFl 
+ - + 


+ — + — + 
I  indent! 
+ - 62  + 


84 

+ - + 

I COBESPS I 
+ - + - + 

I 

+ - + - + 

I  I 

+  --  + - +  + - + - + 

I (CONT) I  I ESPSMAP/INDENT I 
+ - 76+  + - + - + 


+  + 

I PUTC 1 
+ - + 


85 

—  — (- 
I MAKINS I 

+  __-f - 

I 

+ - + - +  —  + - + 


+ - + - + 

I PSSTRC/INDENT | 

+ - 78  + 


I FPRINTF I 
+ - + 


+  — — - 1 — ^ 

I PSSTRC/CSUBi 
+ - 86  + 


+ - + - + 

I PSSTRC/COBSUBj 
+ - 87  + 
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+ - + 

I PSSTRC/CSUB| 
+ - + - + 


+-+--+ 
1 BLEN I 
+ - 4- 


+ - -t- - + 

I FPRINTF| 
+ - + 


4- - 4- - 4- 

I PSSTRC/INDENT ] 
+ - 78  + 


8  7 


I PSSTRC/COBSUB| 


+ 

i 

+  -  +  —  + 

1 

+ - + - + 

+ - 

•I - 4 

1 BLEN| 

1 FPRINTF| 

1 PSSTRC/INDENT I 

+ - + 

+ - + 

+ - 

- 78  + 

-+ 

1 SELWS] 

+ — +- 
1 

-+ 

l— - 

— - 

1 

1 

- + - 

1 

- + - h 

1  1 

--H - + 

+  --  + - + 

1 

+  --+ - + 

I 

+  -+ - + 

1  1 

+  —  + - +  +--  + - + 

MAKPS 1 

1 NULBLKi 

1 STRCPY 1 

1  DASH  1 

1  INDENT  1  1  (CONT)  1 

- 92  + 

4- - 634- 

+ - + 

+  —  77  + 

4 - 624  4 - 934 

..... 

-  + 

1 INSWS I 

+ — +- 
1 

-  + 

^ - 

-  -  + - 

I 

1 

1 

- 4 - + 

1  1 

— + 

+  --  + - + 

1 

1 

--  + - + 

+ 

1 

1 

1 

—  4 

1 

1 

4 

4 

1 

1 

1 

-4 

1 

1 

1 

4 

lULBLK  1 

1 STRCPY 1 

1  DASH  1  1 

indent! 

jFPRINTFj  1 (CONT) 1 

- 63  + 

+ - + 

+  —  77+  + 

- 624 

+ - +  + - 94  + 

88 


89 
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4-  — - 

I  (CONT)  1 
+ - 82  + 


- —  H 

I SELLENi 
+  --+ + 


+ — + 

I  fd] 
+  +  -+ 


++ 


+ - + - + 

I FPRINTFl 
+ - + 


+ — + + 

1  INDENT  I 
+ - 62  + 


+  -  + — + 
I BLEN I 
+ - + 


90 


+ - + 


I YYLEXl 
+  —  +  —  + 


91 


+  —  + - + 

I UNGETCl 
+ - + 


4"  “  “  + 


+ — + — + 
I  WARNING  I 
+ - 11+ 


'T"” 

I STRCMP I 


+  --+ - + 

I CSTASH I 
+ 67  + 


4-  — - 1 - —  + 

I  (CONT)  I 
+ - 95  + 


+ - + 


I MAKPS 1 
+--+--+ 


92 


+ 


I PSSTRC/CSUB| 
+ - 86  + 


+ - + 

+ - 1 - + 

1 PSSTRC/COBSUBl 
+ - 87  + 
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93 

+ - -t- 

I SELWS 1 

+  - H 

I 

+ - + - + — + - + - + - + 
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ABS 

ACTRSV . 16 

ADDCHK . 33 

ADDFRM 

ASSIGN . 79 

ATOF 

ATOI 

BLDSUB . 18 

BLEN 

BSCODE . 28 

CALCSTAT . 57 

CALLOC 

CCONV . 99 

CDMESQY . 96 

CES . 96 

CESPS 

CHKARY . 48 

CHKFLD . 46 

CHKFRM . 33 

CHKGRP . 71 

CHKSIZE . 63 

CLRMDP . 71 

CLSFIL . 75 

COBCONV . 103 

COBES . 102 

COBESPS . 7  6 

COBPE . 63 

COPFLD 

CPE 

CSTASH . 67 

CTLRSV . 15 

DASH . 77 

DATAGEN . 6  5 

DBFREAD . 28 

DCLINDX . 70 

DELFLD 

ENDGEN . 62 

ERROR . 3 

ERRPRO 

ESCPY 

ESPSMAP . 7  6 

ESPSMAP/INDENT. . . .84 

FATAL . 32 

FCLOSE 

FD . 90 

FILELNK . 65 

FLANCI . 4 


FLDRSV . 15 

FLDTYP 

FNDATT . 6  8 

FNDFRM . 17 

FOPEN 

FPRINTF 

FREE 

FRMPDAT . 41 

FRNTND . 2 

FWRITE 

GDATA 

GEN . 17 

GENAA . 19 

GENAAL . 19 

GENACT . 19 

GENAE . 4  3 

GENAH . 4  3 

GENAI . 61 

GENAL . 29 

GENAP . 41 

GENAQ . 2  9 

GENAR . 4  2 

GENAS . 59 

GENAT . 60 

GENBEG . 17 

GENCHG . 3  6 

GENDB . 55 

GENDOA . 29 

GENDS . 55 

GENFP . 53 

GENFS . 52 

GENFSD . 27 

GENINS . 55 

GENMAIN . 17 

GENNDP . 54 

GENPAG . 10 

GENTAL . 51 

GENTRG . 3  5 

GETC 

GETCOL . 77 

GETFILE . 3 

GETPTH . 14 

GETTBL . 73 

GFLDPT . 4  7 

GRP/MAIN . 1 

HASDATA . 18 

HASITEM . 17 
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HAS LOWER 

INDENT . 

.  .  62 

INITAL 

INITFP 

INSERT . 

.  .  77 

INSMAP 

INSRSV . 

.  .  16 

INSWS . 

.  .  89 

ISALNUH 

ISALPHA 

ISDIGIT 

ISOPNE 

ISSPACE 

MAKACT . 

.  .  .  7 

MAKES . 

.  .  96 

MAKES/CNUMPIC.  .  . 

.  103 

MAKES/ INDENT. . . . 

.  .  96 

HAKES/NUMPIC. . . . 

.  102 

MAKFLD 

MAKINS . 

.  .  85 

MAKINT . 

.  .  .  7 

MAKPS . 

.  .  92 

MAKQR . 

.  .  35 

MAKSTR . 

.  .  47 

MAKWH . 

.  .  78 

MAKWHES . 

.  .93 

MAKWH ES/COBWHES. 

.  .  98 

MAKWHES /CWHES 

MAKWHES/NUMPIC.  . 

.  .  98 

HALLOC 

MAP 

MAPDB . 

.  .39 

MAX 

MEMCMP 

MEMCPY 

MEMSET 

MKINC . 

.  .  26 

MKPOS . 

.  .  21 

HLPFRM . 

.  .  .  9 

MV ALLOC . 

•*7 

•  «  •  / 

NDMLGEN . 

.  .  30 

NDMLLAB . 

.  .  64 

N'DMLLNK . 

.  .  78 

N’l'LBLK . 

.  .  63 

or  SCR 

OPNFIL . 

.  .  74 

PEMAP . 

.  .  63 

PMSGLC 

PMSGLS 

PRINTF 

PROCGEN . 64 

PSESMAP 

PSSTRC/COBSUB . 87 

PSSTRC/CSUB . 86 

PSSTRC/ INDENT . 7  8 

PTHPTR 

PUTC 

READDB . 2  8 

RSETNDP . 3  8 

RSETSTAT . 41 

RWEXPD . x3 

RWOPN . 9 

RWSP/FIXFRM . 13 

SAVEES . 100 

SELECT . 63 

SELGEN . 63 

SELLEN . 9  0 

SELMAP . 76 

SELOPN . 4  4 

SELRSV . 2  5 

SELWHR . 2  9 

SELWS . 8  8 

SETNDP . 40 

SPRINTF 

STATRSV . 15 

STDCODE  . 4  5 


STRASN 

STRCAT 

STRCHR 

STRCMP 

STRCPY 

STRLEN 

STRNCMP 

STRNCPY 

STRSPN 

STRUPC 

SYSMSG 

TERMFP 

TOUPPER 


TRGRSV . 16 

TRMNAT 

TRMNDML 

UNGETC 

UQFOR . 51 
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UQPTH . 2  4 

USING . 64 

VISITA . 56 

WARNING . 11 

WINRSV . 14 

WRTEXP . 80 

WRTFRM . 8 

WRTFRM/DBFCLOS. . . . 34 
WRTFRM/ FORMAT 
WRTFRM/TBFCLOS. . . .23 

WRTFRM/WRTDBF . 3  4 

WRTFRM/WRTFLD . 2  2 

WRTFRM/WRTTBF . 2  3 

WRTFRM/WRTTXT . 12 

YYERROR 

YYLEX . 82 

YYPARSE . 4 
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3.11  Proqrain.  Listings  Comments 

This  information  is  contained  in  the  Module  Descriptions  in 
section  3.10. 
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SECTION  4 

QUALITY  ASSURANCE  PROVISIONS 


4 . 1  Introduction  and  Definitions 

"Testing"  is  a  systematic  process  that  may  be  preplanned 
and  explicitly  stated.  Test  techniques  and  procedures  may  be 
defined  in  advance,  and  a  sequence  of  test  steps  may  be 
specified.  "Debugging"  is  the  process  of  isolation  and 
correction  of  the  cause  of  an  error. 

"Antibugging"  is  defined  as  the  philosophy  of  writing 
programs  in  such  a  way  as  to  make  bugs  less  likely  to  occur  and 
when  they  do  occur,  to  make  them  more  noticeable  to  the 
programmer  and  the  user.  In  other  words,  as  much  error  checking 
as  IS  practical  and  possible  in  each  routine  should  be 
performed . 

4 . 2  Computer  Programming  Test  and  Evaluation 

The  quality  assurance  provisions  for  test  consists  of  the 
normal  testing  techniques  that  are  accomplished  during  the 
construction  process.  They  consist  of  design  and  code 
v;alk-throughs ,  unit  testing,  and  integration  testing.  These 
tests  are  performed  by  the  design  team.  Structured  design, 
design  walk-through  and  the  incorporation  of  "antibugging" 
facilitate  this  testing  by  exposing  and  addressing  problem  areas 
before  they  become  coded  "bugs." 
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